c:\@Work\Perl\monks\Anonymous Monk\1056009>perl parse_and_sub_vb_2.pl
#
#  testing function replace_5_14()
#
ok 1
ok 2
ok 3
ok 4
ok 5
ok 6
ok 7
ok 8 - no warnings
1..8