#!perl -ln map print,$_..$_+9