Select Code to Download

#!/usr/bin/perl

...

my @list = qw (hi there);
print Dumper(@list);

$VAR1 = 'hi';
$VAR2 = 'there';