#/usr/bin/perl -wT

# ... {snip regular stuff (code + some POD)} ...

# ... {and now, at the end of the file}

BEGIN
{
   eval 'local $SIG{__DIE__} ; require CGI::NMS::IPFilter';
   $@ and $INC{'CGI/NMS/IPFilter.pm'} = 1;
   $@ and eval <<'END_CGI_NMS_IPFILTER' || die $@;


## BEGIN INLINED CGI::NMS::IPFilter
package CGI::NMS::IPFilter;
use strict;
                                                                               
require 5.00404;
                                                                               
use Socket;

# ... {snip code interspersed with POD} ...

1;
## END INLINED CGI::NMS::IPFilter
END_CGI_NMS_IPFILTER
CGI::NMS::IPFilter->import();
}