perl -e "$,=$\=$/; print keys %::"