Help for this page

Select Code to Download


  1. or download this
     ... 
  tie my $x, 'Tie::Scalar::StringFrame', \$s, 1, 1;
  tie my $y, 'Tie::Scalar::StringFrame', \$s, 5, 1;
...
  2. or download this
     ... 
  tie my $x, 'Tie::Scalar::Substring', \$s, 1, 1;
  tie my $y, 'Tie::Scalar::Substring', \$s, 5, 1;
...