# display_paragraph(array_ref, indentation)
#
# print lines of array, indenting all but first line.
# Note: use strict and use warnings are in effect, 
# so must declare 'my' vars!
#
sub display_paragraph() {
   my $aref = shift;
   my $indentation = shift;
   my $first_time = 1;        # declare and init a flag
   for my $line (@$aref) {
      if (!$first_time) {     # test the flag
         print ' ' x $indentation;
         $first_time = 0;     # change the flag
      }
      print "$line\n";
   }
}