sub my_sub {
 my ($arg1, $arg2) = @_ ? @_ : $_;
 ...
}