use 5.010;
sub display_paragraph() {
   my $aref = shift;
   my $indentation = shift;
   for my $line (@$aref) {
      state $first_time = 0;        # declare and init a flag
      if (++$first_time == 1) {     # change and test the flag
         print ' ' x $indentation;
      }
      print "$line\n";
   }
}