Thanks.
Duh! I can't believe I never saw that. I knew it had to be long done already. I did do some googling put apparently I wasn't looking for the right terms. Oh well. I will polish it regardless as I do like the way I have the numbering set up. (It can number the lines -N - 0 (match)- N+ which I happen to like)

##############################
 -5:
 -4:use 5.006;
 -3:use strict;
 -2:use warnings;
 -1:
  0:use constant PREFIX => '_Branch_';
  1:
  2:use HTML::Parser;
  3:use HTML::Tagset;
  4:use Data::Dumper;
  5:
##############################

-Lee

"To be civilized is to deny one's nature."