#!/usr/bin/perl
use strict;
use warnings;
use feature 'say';

=alternative
BEGIN {
    push ( @INC,"/your/dir/path");
}
=cut

use lib qw(/your/dir/path);
use Foo::Bar qw(hello echoTest); # update adding echoTest

say hello();
say echoTest('Expecting Echo!'); # update adding echoTest subroutine

__DATA__

$ perl test.pl
Hello!
Expecting Echo! # update adding echoTest stdout

##</code><code>##

package Foo::Bar;

use strict;
use warnings;
use Exporter qw(import);

our @EXPORT_OK = qw(hello echoTest); # update adding echoTest

sub hello {
    return 'Hello!';
}

# update adding echoTest sub

sub echoTest {
    return shift;
}

1;