Select Code to Download

#!/usr/bin/env perl

...
print "Out: " . Dumper(@out);
print "Redir: " . Dumper($out);

 % ./t2.pl
In: $VAR1 = 'Test foo';
...
        ];
$VAR5 = [];
Redir: $VAR1 = undef;