perl -MPath::Class -le 'print file(+shift)->cleanup' /foo//baz/./foo.txt
/foo/baz/foo.txt