perl -e "if(length($ARGV[0])==11){print $ARGV[0], (substr($ARGV[0],-10,6))}" 1234567890_
1234567890_234567