Front page | perl.perl5.porters |
Postings from August 2021
Am 30.08.21 um 10:01 schrieb Yuki Kimoto:
>
> Is this really?
>
> perl -E 'sub substr { print "substr\n" }; substr();'
>
> Output
>
> Not enough arguments for substr at -e line 1, near "substr()"
> Execution of -e aborted due to compilation errors.
>
> Imported symbols don't seem to override CORE::substr,
>
> Although the following is OK.
>
> perl -E 'sub substr { print "substr\n" }; &substr();'
>
> Output
>
> substr
>
$ cat test_import.pl
#!/usr/bin/perl
use v5.20;
use strict;
use warnings;
use lib '.';
use MYImport;
substr();
$ cat MYImport.pm
package MYImport;
use parent 'Exporter';
our @EXPORT = qw(substr);
sub substr {
print "substr\n";
}
1;
$ perl test_import.pl
substr
Thread Previous
|
Thread Next