Name des aktuellen Scripts ermitteln (gelöst) - #166154 (Allgemeines zu Perl)

bianca

2013-03-02 18:03

User since
2009-09-13
7016 Artikel
BenutzerIn

user image

Hi!

Ich würde gern in einem "Unterscript" den Namen des Scripts feststellen.
$0 hilft mir leider nicht, das bringt nur den Namen des Hauptscripts.

test.pl:

Code (perl): (dl )

#!/usr/bin/perl -w
use strict;
use warnings;

require "test2.pl";
test2();

test2.pl:

Code (perl): (dl )

#!/usr/bin/perl -w
use strict;
use warnings;

sub test2 {
    print "ich heisse 'test2.pl' und nicht '$0'\n";
    # Welche Variable bringt mir hier test2.pl ?
}
1;

10 print "Hallo"
20 goto 10