Fix the sample script

[perl/modules/subs-auto.git] / samples / subs.pl

diff --git a/samples/subs.pl b/samples/subs.pl
index 4d81e9bdf29412b07a7524ab32683bc942d2e56a..0429e7a9334a745fbfceb5eba7f056ab66217ae0 100644 (file)
--- a/samples/subs.pl
+++ b/samples/subs.pl
@@ -3,7 +3,7 @@
 use strict;
 use warnings;
 
-use lib qw<blib/lib>;
+use blib;
 
 my $x = 7;
 my @a = qw<ba na na>;