Select Code to Download

#!/usr/bin/perl
use strict;
...
&{%hash->{'?'}}();
print Dumper(%hash);
1;

help
help
...
$VAR8 = $VAR6;
$VAR9 = 'LEAVE';
$VAR10 = $VAR6;