Mercurial > pub > Impl
view Lib/IMPL.pm @ 275:6253872024a4
*refactoring IMPL::Class
author | cin |
---|---|
date | Thu, 31 Jan 2013 02:18:31 +0400 |
parents | 4d0e1962161c |
children |
line wrap: on
line source
package IMPL; use strict; use IMPL::_core qw(setDebug); use IMPL::_core::version; sub import { my ($opts) = @_; if (ref $opts eq 'HASH') { setDebug($$opts{Debug}) if exists $$opts{Debug}; } } 1;