Select Code to Download

package Games::QuizTaker;
use strict;
...
    print"$key = $$self{$key}\n";
  }
}

#!/opt/perl5/bin/perl -w
use strict;
...

my $Q=Games::QuizTaker->new(FileName="File",Delimitor=",");
$Q->_Print_Object();