/ \d+/+print"@{[map$_*$',$`/$'..$&/$'-.1]}
"for<>