I would simply imagine that there are no arguments getting passed to the script in your new environment, therefore nothing in the
@ARGV list.
I'd try:
- Posting a snippet of the script(s) for further investigation
- Posting the command line invocation of the script(s)
- Posting the Data::Dumper results of @ARGV
Given any or all of the listed information will certainly help debug this issue.
For the
Data::Dumper part, all I mean is:
#
# Your code
#
use Data::Dumper;
print Dumper( \@ARGV );
#
# More code
#
And just post the contents of the
print statement.
---hA||ta----
print map{$_.' '}grep{/\w+/}@{[reverse(qw{Perl Code})]} or die while ( 'trying' );