~/entwicklung 330> perl   
my @array;

for(1..10){
    push @array, sprintf("%02d",$_);
}

print $_,"\n" for @array;