Help for this page

Select Code to Download

Select or download this

foreach (grep /^\d+$/, @ARGV) {
  $! = $_;
  print "$_: $!";
}

Select or download this

$ perl -le'print "$_: ", $! = $_ foreach grep /^\d+$/, @ARGV' 13 20   
+## It even respects your locale settings
13: Permiso denegado
20: No es un directorio