Lost Places in Perl