Help for this page

Select Code to Download


  1. or download this
    package A1;
    
    ...
    {
      A->export_to_level(1, @_);
    }
    
  2. or download this
    BEGIN {
      use Exporter();
    ...
    }
    use vars @EXPORT;
    $var1 = "1";
    
  3. or download this
    use Exporter::Easiest q( EXPORT => $var1 );
    $var1 = "1";