Examples/PerlExample/Source/TruckPacker.pl

   1 #!/usr/bin/perl -w
   2
   3 #****h* FactoryTools/TruckPacker
   4 # FUNCTION
   5 #   A program to effectively pack a truck with cargo.
   6 #   It consists of two modules:
   7 #     Cargo  -- classes to define the kind of cargo
   8 #               that can be packed.
   9 #     Loader -- classes to define various packing
  10 #               algorithms.
  11 #
  12 #****
  13
  14 use Box;
  15 use SquareBox;
  16 use RectangularBox;
  17 use Loader;
  18
  19 sub main {
  20     print "Hello world\n";
  21 }
  22
  23 main();
  24
  25