Help for this page

Select Code to Download

Select or download this

sub mycheck {
   my $db = shift || "";
...
sub mycheck2 {
   my $db = @_ ? $_[0] : "";
}