# special bash script
export SPECIAL=1
perl my_script.pl



# my_script.pl
...
do_something();
if ($ENV{SPECIAL}) {
    print "Called from the special bash scriptn";
    send_email();
} else {
    print "Not called from special bash scriptn";
}