diff --git a/test_drs110m.pl b/test_drs110m.pl index 163df69..c755586 100755 --- a/test_drs110m.pl +++ b/test_drs110m.pl @@ -6,14 +6,13 @@ use strict; use warnings; use Path::Tiny; -use Cwd qw(getcwd); use IO::Socket::INET; -my $workdir = getcwd; +BEGIN { + push @INC, "./lib"; +} -push @INC, "$workdir/lib"; - -require iec1107; +use iec1107; my $port = Device::SerialPort->new( "/dev/serial/by-id/usb-FTDI_FT232R_USB_UART_AK072UA9-if00-port0")