Help for this page

Select Code to Download

Select or download this

my $linenum= $self->input_line_number;
++$linenum;
$self->input_line_number ($linenum);