in reply to problem with paths to library files

Why not something like the following (i.e., you don't need the BEGIN block)?
use FindBin; use lib "$FindBin::Bin/libs";