%[
#!/usr/interp/perl -w 
# PERL STRING INCREMENT
# By Darren Lim 8/30/97

# Description: This program is a demonstration of Perl string increments.
# Procedure:   Various strings are incremented via the AutoIncrement operator.
#             Each one is then printed to the screen with various results.
# Input:       None
# Output:      The various contents of incremented strings.


  $str1 = "Hello World";
  print ++$str1, "\n";          #Can not handle spaces; prints 1<newline>
  $str2 = "HelloWorld";
  print ++$str2, "\n";          #prints HelloWorle<newline>
  $str3 = "zz9";
  print ++$str3, "\n";          #prints aaa0
  $str4 = "aZ";
  print ++$str4, "\n";          #prints bA
%]
