Sebastian Nebel: Dateiname ohne Pfadangabe auslesen

Ich möchte den Dateinamen ohne Pfadangabe ausgegeben bekommen
Mit:

$File = $ENV{'QUERY_STRING'};
print "$File";

bekomme ich ihn immer nur mit Pfadangabe.
Kann mir da jemand weiterhelfen?

  1. Ich möchte den Dateinamen ohne Pfadangabe ausgegeben bekommen
    Mit:

    $File = $ENV{'QUERY_STRING'};
    print "$File";

    bekomme ich ihn immer nur mit Pfadangabe.
    Kann mir da jemand weiterhelfen?

    Wo ust da eine Pfadangabe?

  2. use Mosche;

    Ich möchte den Dateinamen ohne Pfadangabe ausgegeben bekommen

    Du willst File::Basename verwenden. Wenn du ausserdem den Pfad des aktuell ausgeführten Scripts haben möchtest, wende dich an $0

    use File::Basename;

    print basename($0);

    use Tschoe qw(Matti);

    --
    $a=n(1001010);print chr($a+=$_)for(0,43,-2,1,-84,65,13,1,5,
    -12,-3,13,-82,48,21,13,-6,-76,72,-7,2,8,-6,13,-104);sub n{
    $b=0;$_=0;for($c=length$_[0];$c;--$c){$_+=_($b)if substr$_
    [0],$c-1,1;$b++;}$_}sub _{($d)=@_;for($e=1;$d--;$e*=2){}$e}