/usr/local/CPAN/CGI-Bus/CGI/Bus/lngbase/CGI_Bus.pm

• package CGI::Bus::lngbase::CGI_Bus
  • lngbase
• EOF

#!perl -w
#
# admiral 
# 16/12/2001
#
# 

package CGI::Bus::lngbase::CGI_Bus; # Language base
use strict;


1;

sub lngbase {
 ('Warning' =>['Warning','Trouble warning']
 ,'Error'   =>['Error',  'User or Software error']
 )
}