@maps=grep /\.bsp/, @$game;
                    ^^^^^^ should be @maps
[download]

Off-topic, that regexp will accept the file "file.bsp.bak". That's why I added \z to the regexp in my code.