use File::Spec; print File::Spec->rel2abs(__FILE__);