Select Code to Download

perl -pe 's/([0-9]{10})$/sprintf "%010d",$1-2/e'

perl -pe 's/([0-9]{10})$/sprintf "%010d",$1-2/e if /^0TONY/'