Select Code to Download

#!/usr/bin/perl -w
#class file.
...

1;

#!/usr/bin/perl -w

...
$meal->display();
print " please.";
print( "\n" );