]> git.donarmstrong.com Git - infobot.git/blobdiff - src/Modules/Zippy.pl
news -> News
[infobot.git] / src / Modules / Zippy.pl
index e082791f83a46b3870d11a6ede0b517a4044ebde..b608fb9b53b7e397e5f4b7358b9f428fd0d07ff5 100644 (file)
@@ -7,15 +7,16 @@
 
 package zippy;
 
+use strict;
+
 my $no_zippy; # Can't think of any situation in which this won't work..
 
 sub zippy::get {
-    unless (@yows) { # read data unless it's been read already.
-       print "Reading...\n";
-       while (<DATA>) {
-           chomp;
-           push @yows, $_;
-       }
+    my @yows;
+    print "Reading...\n";
+    while (<DATA>) {
+       chomp;
+       push @yows, $_;
     }
 
     if ($no_zippy) { # ..but just in case :-)