]> git.donarmstrong.com Git - infobot.git/blobdiff - src/Modules/Zippy.pl
strict
[infobot.git] / src / Modules / Zippy.pl
index 73f4d63a54a5ec2afc8553db6e0f5de94e5c97c0..b608fb9b53b7e397e5f4b7358b9f428fd0d07ff5 100644 (file)
@@ -12,12 +12,11 @@ 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 :-)