Thread File::Basename durch Reguläre Ausdrücke ersetzen
(27 answers)
Opened by Kean at 2013-10-18 16:35
@Kean
Ich weiß ja nicht was du erreichen willst, wo bei dir File::Basename nicht funktioniert, aber: Code (perl): (dl
)
1 2 3 4 5 use File::Basename qw(dirname basename); my $pfad = 'C:\Test\Dateiname.abc'; my $verz = dirname($pfad); # Inhalt Variable -> "C:\Test\" my $dateiname = basename($pfad,""); # Inhalt Variable -> "Dateiname" print "$pfad\n$verz\n$dateiname\n"; C:\Test\Dateiname.abc C:\Test Dateiname.abc |