$ENV{PATH} = "/home/abc/xyz/bin:$ENV{PATH}";

##</code><code>##

# my_env.pl
#!/usr/bin/perl
print q{export PATH=/home/abc/xyz/bin:$PATH}, "\n";

# and this is how you call it:
$ eval `./my_env.pl`