linux-l: Perl-Script

Axel Burkhardt burgi at burgi.de
Do Mär 30 11:20:58 CEST 2000


> Hallöle allerseits....
> ich habe ein kleines Problemchen und hoffe jemand könne mir helfen. Ich
> will ein Perlscript schreiben, was einen Dateinamen von Groß- in
> Kleinbuchstaben umwandelt ! Problem dabei ist noch, daß die Dateinamen
> HEP1.EPS oder HEP321.EPS lauten. Hat jemand eine Idee ?


> Manuel

kurz zusammengestümpert:


#!/usr/bin/perl
foreach $filename (@ARGV) {
        $new_filename=$filename;
        $new_filename=~tr/A-Z/a-z/;
        print "$filename --> $new_filename\n";
        system "mv $filename $new_filename";
}


sollte es tun


Axel



Mehr Informationen über die Mailingliste linux-l