$_='hotel'; %f=map {$_=>1} split //; print join('',keys %f), "\n";