xref: /openbsd-src/gnu/usr.bin/perl/lib/perl5db/t/disable-breakpoints-3 (revision 898184e3e61f9129feb5978fad5a8c6865f00b92) 
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