my $entry_no_new   = pop @_;
my @array_of_lines = @_;

##</code><code>##

my @array_of_lines = @_;
my $entry_no_new   = pop @array_of_lines;