my $cursor = [qw/@mouse.xbm mouse.mask brown white/];