Help for this page

Select Code to Download


  1. or download this
    package Foo;
    require bytes; # make sure the module is loaded without (un)import
    ...
    __DATA__                        # actual source of module starts here
    BEGIN {bytes->import if $bytes} # activate bytes if flag set
    sub new { bless {},shift }      # example routine
    
  2. or download this
    use Foo 'usebytes'; # or something else to not use bytes
    my $foo = Foo->new;