in reply to In my perl code i am getting some other output instead of Other
my $usage = "Usage: $0 [path]\n default: value of env.variable LOGS_EV +\n"; my $destdir; if ( @ARGV ) { $destdir = $ARGV[0]; } elsif ( $ENV{'LOGS_EV'} ) { $destdir = $ENV{'LOGS_EV'} } else { warn "Please supply a path or set LOGS_EV\n\n"; die $usage; }
|
---|