in reply to hash loop print
#!/usr/bin/perl -w for (1 .. 10) { $numbers{$_} = $_ . "\n"; } for (1 .. 10) { print $numbers{$_}; } [download]