use warnings; use strict; #### @line = pop(@line); #### $inum = ++$inum;
## @line = pop(@line); ##
## $inum = ++$inum;