perl -e 'use strict; my %foo = (Bar::Baz => "qux")'