Help for this page

Select Code to Download


  1. or download this
    Global symbol "$buffer" requires explicit package name at ...
Global symbol "@output" requires explicit package name at ...
Global symbol "%states" requires explicit package name at ...
  2. or download this
    my ($buffer, @output, %states);
  3. or download this
    our ($buffer, @output, %states);
  4. or download this
    package DFA;
sub new {
...
  $dfa;                # return the new object
}
...
  5. or download this
    sub argout {
  my $dfa = shift;      # $dfa here is equivalent to 'this' in Java
...

my $dfa = DFA->new();
$dfa->argout();