view Lib/IMPL/_core.pm @ 247:2270de2469ff

sync
author sergey
date Wed, 31 Oct 2012 04:18:35 +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;