print "My scalar = ${\(my $scalar = 5)}\n";
print "My array = @{[(0..9)]}\n";
print "My array via scalar references passed to map = @{[ map {$$_} \(0..9) ]}\n";
print "My array returned by anonymous subroutine = @{[do {(0..9)}]}\n";
print "My array formatted with join = ${\(join '*',(0..9))}\n";
print "My hash treated as array   = @{ [my %h = (0..9)] }\n";