Select Code to Download

use Data::Dumper;

my @ar = "fred bert";

print Dumper(\@ar);

$VAR1 = [
          'fred bert'
        ];