Select Code to Download

#!/usr/bin/perl
use warnings;
...
}

print Dumper $broken, $works;

perl example.pl
$VAR1 = {
...
          'that' => 1,
          'this' => 1
        };