view Lib/IMPL/_core.pm @ 218:358f867712b4

sync
author sergey
date Mon, 20 Aug 2012 17:24:48 +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;