my $s = "a";
$s .= "abcdefghijklmop";

my @a = (0 .. 4);
$a[55] = "frog";

my %h = (red => 1, blue => 2, yellow => 3);
$h{green} = 6.02e23;