for(++$....$.++.$.)
{print "$_\n"}