Help for this page

Select Code to Download


  1. or download this
    sub table {
  my ($tab,$opt) = @_;
...
        data  => [qw/100  200      comment/],
    ],
});
  2. or download this
    sub table {
  my ($tab,$opt) = @_;
...
        data( qw/100  200      comment/),
    ],
});
  3. or download this
    sub table {
  my ($tab,$opt) = @_;
...
        data( qw/100  200      comment/),
    ],
});
  4. or download this
    use strict;
use warnings;
...
);

$table->output(1);
  5. or download this
    use strict;
use warnings;
...
);

$table->output(1);