дано целое число. если оно является положительным, то прибавь к нему 1; в противном случае не изменять его. Вывести полученное число. Кумир

#!/usr/bin/env perluse strict;use warnings;use utf8;say _solve_(shift(@ARGV));sub _solve_{return('Not a number') if(int($exec_arg) !~ /^[\d].*?$/six)if(int($exec_arg) >= 0 ){   return(int($exec_arg)++);}else{  return($exec_arg);}}