#!perl -ln
/\d+/||<>=~//^print~~($`?reverse:$_)x$&