sub mySub{
  my $Arg = shift;
}

sub mySub2{
  my ($Arg) = @_;
}