13:45 >perl -Mbigint -wE "my ($m, $k) = split / /, qq[10 2\n]; say qq[>$k<]; ++$k; say qq[>>$k<<];"
>2
<
>>3<<

13:49 >