Try running this script to see what your paths are supposed to be...
use CGI qw(:standard);
print header(),
html(
body(
join br(), map { "$_ = $ENV{$_}"} sort keys %ENV
)
);
Code:
#!/usr/local/bin/perl use CGI qw(:standard);
print header(),
html(
body(
join br(), map { "$_ = $ENV{$_}"} sort keys %ENV
)
);