Help for this page

Select Code to Download


  1. or download this
    foreach my $j (0..$i-1) {
    $SUB = $j."Textfield_MaxText";
    ...
        *$SUB = sub { variableMaxText(0); };
  2. or download this
    $SUB = "1Foo";
*$SUB = sub {print "$SUB!\n"};
1Foo();
Bareword found where operator expected at -e line 3, near "1Foo"
        (Missing operator before Foo?)
  3. or download this
    $SUB = "1Foo";
*$SUB = sub {print "$SUB!\n"};
&{"1Foo"};
__END__
1Foo!