Thanks both, nice tips.
Can confirm that both 'test.pl' and 'test-response.pl' are recognised in the following tests
my @files=(); @files=glob('*'); print join("\n",@files),"\n";
and
use Data::Dump qw( pp ); pp <*.pl>;
and that this test yields '/home/Andy/Desktop' as expected
use Cwd; my $dir = getcwd; print "$dir\n";
Finally, %inc contains:
warnings/register.pm /usr/share/perl/5.24/warnings/register.pm overload.pm /usr/share/perl/5.24/overload.pm vars.pm /usr/share/perl/5.24/vars.pm Cwd.pm /usr/lib/x86_64-linux-gnu/perl/5.24/Cwd.pm Exporter.pm /usr/share/perl/5.24/Exporter.pm overloading.pm /usr/share/perl/5.24/overloading.pm File/Glob.pm /usr/lib/x86_64-linux-gnu/perl/5.24/File/Glob.pm warnings.pm /usr/share/perl/5.24/warnings.pm Data/Dump.pm /usr/local/share/perl/5.24.1/Data/Dump.pm strict.pm /usr/share/perl/5.24/strict.pm /etc/perl/sitecustomize.pl /etc/perl/sitecustomize.pl XSLoader.pm /usr/local/lib/x86_64-linux-gnu/perl/5.24.1/XSLoader.pm subs.pm /usr/share/perl/5.24/subs.pm
Confusing!
In reply to Re^4: 'do' command is dead? Surely not?
by ACI
in thread 'do' command is dead? Surely not?
by ACI
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |