sub f3 {
   my $input = @_ ? shift : $_;
   return $input + 1;
}

##</code><code>##

sub f4 (_) {
   my $input = shift;
   return $input + 1;
}