Re: [PERL] Tilføj streng til alle filnavne i etdir?

[Kim Schulz <sslug@sslug>]

[snip]
> noget ala følgende må ku gøre det:
> 
> for FILE in(ls);do
>  mv $FILE 20030107_$FILE;
> done;

og så overså jeg lige at du spurgte på perl listen :o)


#!/bin/perl

foreach $file (@ARGV){
    rename $file, 20030107_$file;
}