use strict;my @list = ('116','111','109','109','111','110','116','101' +);&show; @list[0] = @list[7];@list[1] = '114';@list[2] = '103';@list[3] = @list +[4];@list[4] = '119'; @list[5] = @list[3];@list[6] = '108';@list[7] = '102';&show;sub show { +foreach (@list) { print chr($_);}print "\n";} # this prints out my name and my alterego
In reply to First attempt! by ergowolf
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |