sub bail_out {
    require Carp;
    Carp::confess(@_);
}

##</code><code>##

package Cwd;
sub cwd;
package main; # or whatever module you are in
...