package Acme::Spinners::BigGuns; # Currently breaks for some odd reason my @frames = ( "[>- -<]", "[> - - <]", "[> - - <]", "[> - - <]", "[> - - <]", "[> - - <]", "[> - - <]", "[> - - <]", "[> - - <]", "[> - - <]", "[> - - <]", "[> - - <]", "[> - - <]", "[> - - <]", "[> -- <]", "[> (##) <]", "[> (#*##*#) <]", "[> (#*#*##*#*#) <]", "[> (#*#*#*##*#*#*#) <]", "[> (#*#*#*#*##*#*#*#*#) <]", "[> (#*#*#*#*#*##*#*#*#*#*#) <]", "[> (#*#*#*#*#*#*##*#*#*#*#*#*#) <]", ")}#*#*#*#*#*#*#*##*#*#*#*#*#*#*#{(", "_*#*#*#*#*#*#*# #*#*#*#*#*#*#*_", "_ #*#*#*#*#*# #*#*#*#*#*# _", "_ *#*#*#*# #*#*#*#* _", "> #*#*# #*#*# <", "> *# #* <", "[> <]", ); sub new { bless {}, $_[0]; } sub frames { return @frames; } sub speed { return 0.1; } 1;