On 9/6/06, [EMAIL PROTECTED] <[EMAIL PROTECTED]> wrote:
Consider this: my $arg = @ARGV ? shift @ARGV : <STDIN>;
Works as I expected, many thanks. However, my previous code was: my $time_in = $ARG[0] || <STDIN>; and it doesn't work, why and whats the different with yours? rgds, -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] <http://learn.perl.org/> <http://learn.perl.org/first-response>