#PPPOE module PPPOE.pm package PPPOE; use 5.006001; use strict; use warnings; use Carp; our @ISA = qw(Exporter); our %EXPORT_TAGS = ( 'all' => [ qw( ) ] ); our @EXPORT_OK = ( @{ $EXPORT_TAGS{'all'} } ); our @EXPORT = qw( ); our $VERSION = '0.01'; require XSLoader; XSLoader::load('PPPOE', $VERSION); 1; __END__ #### #calling Perl script #! /usr/bin/perl use strict; use warnings; use PPPOE;