function test() { cd `perl -e 'print "/tmp\n";'`; }