$abs_path = File::Spec->rel2abs( "../../"); print "$abs_path\n __OUTPUT__ /usr/local/bin/../..