
 ~~~~~~ Demonstration overview ~~~~~
 
Perl code begins with the prompt

 =>

The selected results from executing the Perl Code 
follow on the next lines. For example,

 => 2 + 2
 4

 ~~~~~~ The demonstration follows ~~~~~

 =>     #########
 =>     # For "TEST" 1.24 or greater that have separate std err output,
 =>     # redirect the TESTERR to STDOUT
 =>     #
 =>     tech_config( 'Test.TESTERR', \*STDOUT );
 => my $x = 2
 => my $y = 3
 => $x + $y
 '5'
 
 => $y-$x
 '1'
 
 => $x+4
 '6'
 
 => $x*$y*2
 '12'
 
 => $x
 2
 
 =>     my @expected = ('200','201','202');
 =>     my $i;
 =>     for( $i=0; $i < 3; $i++) {
 => $i+200
 '200'
 
 => $i + ($x * 100)
 '200'
 
 =>     };
 => $i+200
 '201'
 
 => $i + ($x * 100)
 '201'
 
 =>     };
 => $i+200
 '202'
 
 => $i + ($x * 100)
 '202'
 
 =>     };
 => $x + $y
 '5'
 
 => $x + $y + $x
 '7'
 
 => $x + $y + $x + $y
 '10'
 
