sub Sub_With_NO_Side_Effects {
    my @arg = map { defined $_ ? $_ : '' } @_;
    print "$_: '$arg[$_]'\n" foreach  0..$#arg;
}