X-Git-Url: http://git.vpit.fr/?a=blobdiff_plain;f=samples%2Fbrd.pl;h=f49a8eb0e0951e698de6b728b01356a2d75a5b23;hb=f0596ac13a537630fc7421d5d21249a603bd0375;hp=9e0f790801abec0525fe624072a607f849fece12;hpb=e531c89b3ecbc5d58156f71c5324f5f253459864;p=perl%2Fmodules%2FB-RecDeparse.git diff --git a/samples/brd.pl b/samples/brd.pl index 9e0f790..f49a8eb 100755 --- a/samples/brd.pl +++ b/samples/brd.pl @@ -3,12 +3,10 @@ use strict; use warnings; -use lib qw{blib/lib}; +use lib qw; use B::RecDeparse; -# use B::Deparse; my $deparser = B::RecDeparse->new(deparse => [ '-sCi0v1' ], level => 1); -# my $deparser = B::Deparse->new('-sCi0v1'); sub spec (&) { return unless defined $_[0] and ref $_[0] eq 'CODE';