view Lib/IMPL/_core.pm @ 217:bfce101e0a5a

Слияние
author cin
date Mon, 20 Aug 2012 10:27:20 +0400
parents d1676be8afcc
children
line wrap: on
line source

package IMPL::_core;
use strict;
use IMPL::_core::version;

use parent qw(Exporter);
our @EXPORT_OK = qw( &isDebug &setDebug);

our $Debug = 0;

sub isDebug { $Debug };
sub setDebug { $Debug = shift };

1;