Select Code to Download

#!/usr/bin/perl
use strict;
use warnings;
use Data::Dumper;

print Dumper ['foo', 'bar', {a => 1, b => 2}];