Changeset 15889 for gsdl/trunk/perllib/giget.pm

Timestamp:

2008-06-06T10:57:28+12:00 (16 years ago)

Author:

mdewsnip

Message:

Added "use strict", and fixed resulting problems.

File:

• gsdl/trunk/perllib/giget.pm (modified) (2 diffs)

gsdl/trunk/perllib/giget.pm

@@ +1 @@
+use strict;
+
 
 sub readin_html 
@@ -245 +247 @@
     my $nextpage_url = gi_query_url($search_terms);
     
-    $respage_fname = "$output_dir/respage1.html";
+    my $respage_fname = "$output_dir/respage1.html";
     get_gi_page($gi_base,$nextpage_url,$respage_fname);