Help for this page

Select Code to Download


  1. or download this
    $num = '0000';
for(1..1000) {
  print ++$num,"\n";
}
  2. or download this
    for my $num ('0000' .. '1000') {
    ...
}