perl -MFile::Spec::Functions -le "print catfile( \$ENV{USERPROFILE}=> q[APPLIC~1]=> q[Opera/Opera7/profile/search.ini] )"