in reply to Default subroutine parameters
Could you check the number of arguments using $#argv and use an if statement to define it or not.
Sam
or something like that. I hope that helps.if ($#argv == 0){ $foo = 'default'; }else { $foo = shift; }
Sam
In Section
Seekers of Perl Wisdom