Perlで、

$a[0] = "HyperTextTransferProtocol = HTTP";
$a[1] = "UniversalResourceLocation = URL";
$a[2] = "DataBase = DB";

これらの=より前の部分を大文字にしてスペースで区切って

HYPER TEXT TRANSFER PROTOCOL
UNIVERSAL RESOURCE LOCATION
DATA BASE

と出力させたい。
どなたかご教授願います。