require'd sub löschen (gelöst) - #183842 (Allgemeines zu Perl)

bianca

2016-02-13 10:49

User since
2009-09-13
7016 Artikel
BenutzerIn

user image

Ich habe hierzu eine Anschlussfrage.
This is perl 5, version 18, subversion 4 (v5.18.4) built for MSWin32-x64-multi-thread

test_coderef.pl:

Code (perl): (dl )

#!/usr/bin/perl
use strict;
use warnings;
use 5.010;

lauf(1);
lauf(2);

sub lauf {
        my $coderef = require "test_coderef_sub$_[0].pl";
        $coderef->("world");
}

test_coderef_sub1.pl:

Code (perl): (dl )

use strict;
use warnings;
use 5.010;

sub {
        say "Hello $_[0] 1 ";
}

test_coderef_sub2.pl:

Code (perl): (dl )

package test;
use strict;
use warnings;
use 5.010;

sub {
        say "Hello $_[0] 2 ";
}

Läuft wunderbar:

Quote
d:\temp>perl test_coderef.pl
Hello world 1
Hello world 2

ABER:

Quote
d:\temp>perl -c test_coderef_sub1.pl
Useless use of reference constructor in void context at test_coderef_sub1.pl line 7.
test_coderef_sub1.pl syntax OK

Was bedeutet das in diesem Zusammenhang und wie kann ich dieses verwirrende "Useless use..." los werden?

10 print "Hallo"
20 goto 10