($foo, $bar) =(1..5)[1,4];
print "$foo $bar";