skeleton.pm0

主要用于监控网络流量并动态产生可视化结果

###### PATCHTAG00 ###################################################
# -*- mode: Perl -*-
######################################################################
### Localization of mrtg output pages
######################################################################
#                                                                    #
#   This is a generated perl module file.                            #
#   Please see the perl script mergelocale.pl and the language       #
#   databasefiles skelton.pm0 and locale.*.pmd in translate/.        #
#   If you want to contribute to mrtg change in the *.pmd files.     #
#   If you just want to change your own mrtg: Go ahead and edit!     #
#                                                                    #
######################################################################
### Defines programs which handles centralized pattern matching and pattern 
### replacements in order to translate the given strings
######################################################################
### Created by:  Morten Storgaard Nielsen <[e-mail]>
###################################################################
#
# Distributed under the GNU copyleft
#
###################################################################
### Locale by: 
###### PATCHTAG10 ###################################################
###
### Contributions and fixes by:
###
###      0.05 fixed DARK GREEN entry		([e-mail])
###           fixed credits for native language ([e-mail])
###	 0.06 added the PATCHTAGs               ([e-mail])
###           fixed several small errors        ([e-mail])
###	 0.07 changed PATCHTAG to support 
###           mergelocale.pl                    ([e-mail])
###
######################################################################
###
package locales_mrtg;

require 5.002;

use strict;
use vars qw(@ISA @EXPORT $VERSION);
use Exporter;

$VERSION = '0.07';

@ISA = qw(Exporter);

@EXPORT = qw
(
  &english
###### PATCHTAG20 ###################################################
);

%lang2tran::LOCALE=  
(
  'english'      => \&english,
  'default'      => \&english, 
###### PATCHTAG30 ###################################################
);

%credits::LOCALE=
  (
# default
   'default' =>
   "  <HR NOSHADE>
  <TD WIDTH=388 ALIGN=RIGHT><FONT FACE=\"Arial,Helvetica\" SIZE=2>
  Prepared for localization by
    <NOBR><A HREF=\"http://www.ipt.dtu.dk\">Morten S. Nielsen</A>
  <A HREF=\"mailto:msn\@ipt.dtu.dk\">
  &lt;msn\@ipt.dtu.dk&gt;</A></NOBR>",
###### PATCHTAG40 ###################################################
  );

###### PATCHTAG50 ###################################################

# English - default
sub english
{
  return pop(@_);
};

###### PATCHTAG60 ###################################################