File::Basename durch Reguläre Ausdrücke ersetzen - #171255 (Allgemeines zu Perl)

Kean

2013-10-18 16:35

User since
2004-08-18
463 Artikel
BenutzerIn

user image

Ich habe einen seltsames Problem mit einem meiner Scripte und vermute den Fehler im Modul File::Basename.
Deshalb würde ich gerne die beiden Funktionen "basename" und "dirname" durch Reguläre Ausdrücke ersetzen.

Bisher sieht mein Code so aus:

Code (perl): (dl )

1
2
3

my $pfad = "C:\Test\Dateiname.abc";
my $verz = dirname($pfad); # Inhalt Variable -> "C:\Test\"
my $dateiname = basename($pfad,".abc"); # Inhalt Variable -> "Dateiname"

Wie kann ich diese beiden Funktionen am effektivsten durch Reguläre Ausdrücke ersetzen?
Oder gibt es ein anderes Modul was die gleiche Funktionalität hat was ich ausprobieren kann?
Last edited: 2013-10-18 16:41:15 +0200 (CEST)