X-Git-Url: http://git.vpit.fr/?a=blobdiff_plain;f=samples%2Fuvar.pl;h=d1e52abdc5559950b82e27bbc2a1430ff1c3fd9a;hb=aae88f4cf6f2f32553f8cc29cb8f0792cb5cd910;hp=3a968ec93c298094126f7936d14249c0f10dbe87;hpb=763ba8093427f3668368fa885741618ac6289d41;p=perl%2Fmodules%2FVariable-Magic.git

diff --git a/samples/uvar.pl b/samples/uvar.pl
index 3a968ec..d1e52ab 100755
--- a/samples/uvar.pl
+++ b/samples/uvar.pl
@@ -1,10 +1,10 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 
 use strict;
 use warnings;
 
-use lib qw{blib/arch blib/lib};
-use Variable::Magic qw/wizard getsig cast dispell/;
+use lib qw<blib/arch blib/lib>;
+use Variable::Magic qw<wizard cast dispell>;
 
 my $wiz = wizard
  fetch  => sub { print STDERR "$_[0] FETCH KEY $_[2]\n" },