Help for this page

Select Code to Download


  1. or download this
    my $s = 'ABCDE';
print substr($s,0,2)='',$/;    # EXPECT '', GET 'cd'?
print substr($s,0,2)='foo',$/; # EXPECT 'foo', GET 'fo'?
  2. or download this
    my $s = 'ABCDE';
print $s='',$/;                # EXPECT ''
print $s='foo',$/;             # EXPECT 'foo'