my @MagicItems; tie @MagicItems, main; # main, or the package of your code
@MagicItems = (
    "can use all magic items",
    "can not use any magic items",
    sub { "can only use magic items in the ".random("MITp")." group"},
    sub { "can not use magic items in the ".random("MITp")." group"},
    sub { "causes $MagicItemGroup[rand @MagicItemGroup] to dysfunction $radius"},
    sub { "causes $MagicItemGroup[rand @MagicItemGroup] to loose their power $radius"},
    sub { "attracts $MagicItemGroup[rand @MagicItemGroup] $radius"},
    sub { "repels $MagicItemGroup[rand @MagicItemGroup] $radius"},
    sub { "destroys $MagicItemGroup[rand @MagicItemGroup] $radius"},
);