xref: /openbsd-src/gnu/usr.bin/perl/lib/perl5db/t/disable-breakpoints-3 (revision 91f110e064cd7c194e59e019b83bb7496c1c84d4)
1#!/usr/bin/perl
2
3use EnableModule;
4my $x = "One";
5
6$x = "FirstVal";
7
8EnableModule::set_x(\$x);
9
10$x = "SecondVal";
11
12EnableModule::set_x(\$x);
13
14$x = "ThirdVal";
15
16EnableModule::set_x(\$x);
17
18$x = "FourthVal";
19
20EnableModule::set_x(\$x);
21
22