This one works for me. :)
my $start_Note = 'N<'; my $N = '<font class="footnote">'; my $end_Note = '\.>'; my $n = '</font>'; open(DATA, "<file.pod"); my @file = <DATA>; s/$start_Note/$N/g for @file; s/$end_Note/$n/g for @file;
In reply to Re: matching POD footnote
by anek77713
in thread matching POD footnote
by anek77713
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |