c:\@Work\Perl\monks\jcg3525>perl ParsePlaybill.t
ok 1 - use ParsePlaybill;
ok 2 - ^46004 % Tamerlane.| Tamerlane - Sheridan; Bajazet - Barry; Moneses - A Gentleman; Arpasia - Mrs. Furnival; Selima - Mrs. Elmy; +
#
# Polonius "fixed" in this test case
ok 3 - ^46005 % Hamlet.| Hamlet - Sheridan; Polonius - J. Morris; Laertes- Lacy; Ophelia- Mrs. Storer; Queen - Mrs. Furnival; +
#
# one-character play
ok 4 - ^1 %   Mark Twain Tonight  .| Mark Twain  -Hal Holbrook;+
#
ok 5 - no warnings
1..5