GSP
Quick Navigator

Search Site

Unix VPS
A - Starter
B - Basic
C - Preferred
D - Commercial
MPS - Dedicated
Previous VPSs
* Sign Up! *

Support
Contact Us
Online Help
Handbooks
Domain Status
Man Pages

FAQ
Virtual Servers
Pricing
Billing
Technical

Network
Facilities
Connectivity
Topology Map

Miscellaneous
Server Agreement
Year 2038
Credits
 

USA Flag

 

 

Man Pages


Manual Reference Pages  -  XPORTER (3)

.ds Aq ’

NAME

Xporter - Alternative Exporter with persistant defaults & auto-ISA

CONTENTS

VERSION

Version 0.1.1

SYNOPIS

In the Exporting module:



  { package module_adder [optional version];
          use warnings; use strict;
    use mem;                    # to allow using module in same file
    our (@EXPORT, @EXPORT_OK);
    our $lastsum;
    our @lastargs;
    use Xporter(@EXPORT=qw(adder $lastsum @lastargs),
                        @EXPORT_OK=qw(print_last_result));

    sub adder($$) {@lastargs=@_; $lastsum=$_[0]+$_[1]}
    sub print_last_result () {
      use P;    # using P allows answer printed or as string
      if (@lastargs && defined $lastsum){
        P "%s = %s\n", (join  +  , @lastargs), $lastsum;
      }
    }
  }



In use-ing module (same or different file)



  package main;  use warnings; use strict;
  use module_adder qw(print_last_result);

  adder 4,5;



Printing output:



  print_last_result();

  #Result:
 
  4 + 5 = 9



(Or in a test:)



  ok(print_last_result eq "4 + 5 = 9", "a pod test");



DESCRIPTION

Xporter provides EXPORT functionality similar to Exporter with some different rules to simplify common cases.

The primary difference, in Xporter is that the default EXPORT list remains the default EXPORT list unless the user specifically asks for it to not be included, whereas in Exporter, asking for any additional exports from the EXPORT_OK list, clears the default EXPORT list.

Xporter makes it easy to reset or clear the default so that choice is left to the user.

To reset the default EXPORT list to empty, a bare minus (’-’) or logical-not sign (’!’) is placed as the first parameter in the client’s import list.

Example

Suppose a module has exports:



  our (@EXPORT, @EXPORT_OK);
  use Xporter(@EXPORT=qw(one $two %three @four),
              @EXPORT_OK=qw(&five));



In the using module, to only import symbols ’two’ and ’five’, one would use:

Example



  use MODULENAME qw(! $two five);



That negates the default EXPORT list, and allows selective import of the values wanted from either, the default EXPORT or the EXPORT_OK lists. Note: modules in the default list don’t need to be reiterated in the OK list as they are already assumed to be OK to export having been in the default list.

(New in 0.1) It is also possible to negate only 1 item from the default EXPORT list, as well as import optional symbols in 1 statement.

Example



  use MODULENAME qw(!$two five);      #or
  use MODULENAME qw(!two five);



Only export two from the default export list will be excluded. Whereas export five will be added to the list of items to import.

Other functions of Exporter are not currently implemented, though certainly requests and code donations made via the CPAN issue database will be considered if possible.

    Types and Type Export

Listing the EXPORT and EXPORT_OK assignments as params to Xporter will allow their types to be available to importing modules at compile time. the mem module was provided as a generic way to force declarations into memory during Perl’s initial BEGIN phase so they will be in effect when the program runs.

    Version Strings

Version strings in the form of a decimal fraction, (0.001001), a V-String (v1.2.1 with no quotes), or a version string (’1.1.1’ or ’v1.1.1’) are supported, though note, versions in different formats are not interchangeable. The format specified in a module’s documentation should be used.
Search for    or go to Top of page |  Section 3 |  Main Index


perl v5.20.3 XPORTER (3) 2014-08-18

Powered by GSP Visit the GSP FreeBSD Man Page Interface.
Output converted with manServer 1.07.