my(@a) = ();
my($b) = {};
my(@c) = [];
my(%d) = ();