From f44c0278cb36b2259ce42db9f730afeb02779d96 Mon Sep 17 00:00:00 2001 From: Nigel Kukard <nkukard@lbsd.net> Date: Sun, 23 Jun 2013 09:25:14 +0000 Subject: [PATCH] Added constants package --- opentrafficshaper/constants.pm | 43 ++++++++++++++++++++++++++++++++++ 1 file changed, 43 insertions(+) create mode 100644 opentrafficshaper/constants.pm diff --git a/opentrafficshaper/constants.pm b/opentrafficshaper/constants.pm new file mode 100644 index 0000000..78f5efb --- /dev/null +++ b/opentrafficshaper/constants.pm @@ -0,0 +1,43 @@ +# OpenTrafficShaper constants package +# Copyright (C) 2013, AllWorldIT +# +# This program is free software: you can redistribute it and/or modify +# it under the terms of the GNU General Public License as published by +# the Free Software Foundation, either version 3 of the License, or +# (at your option) any later version. +# +# This program is distributed in the hope that it will be useful, +# but WITHOUT ANY WARRANTY; without even the implied warranty of +# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +# GNU General Public License for more details. +# +# You should have received a copy of the GNU General Public License +# along with this program. If not, see <http://www.gnu.org/licenses/>. + +package opentrafficshaper::constants; + +use strict; +use warnings; + + +# Exporter stuff +require Exporter; +our (@ISA,@EXPORT,@EXPORT_OK); +@ISA = qw(Exporter); +@EXPORT = qw( + SHAPER_NOTLIVE + SHAPER_PENDING + SHAPER_LIVE +); + + +use constant { + SHAPER_NOTLIVE => 0, + SHAPER_PENDING => 1, + SHAPER_LIVE => 2, +}; + + + +1; +# vim: ts=4 -- GitLab