changeset 8:3525971010e4

use FindBin for perlscirpts
author anatofuz
date Mon, 05 Nov 2018 16:44:49 +0900
parents b9a157e11952
children 1fda58f3b60f
files logs2.pl opcode2function.pl
diffstat 2 files changed, 4 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/logs2.pl	Mon Nov 05 16:40:06 2018 +0900
+++ b/logs2.pl	Mon Nov 05 16:44:49 2018 +0900
@@ -1,7 +1,8 @@
 use strict;
 use warnings;
 
-use lib 'lib';
+use FindBin;
+use lib "$FindBin::Bin/lib";
 use OPCODE2Function;
 
 my $originlog = shift or die "use originlog cbclog";
--- a/opcode2function.pl	Mon Nov 05 16:40:06 2018 +0900
+++ b/opcode2function.pl	Mon Nov 05 16:44:49 2018 +0900
@@ -1,7 +1,8 @@
 use strict;
 use warnings;
 
-use lib 'lib';
+use FindBin;
+use lib "$FindBin::Bin/lib";
 use OPCODE2Function;
 
 my $input =  shift or die 'use input cur_op';