[Swift-devel] coaster worker.pl syntax errors for perl installations on RHEL4 variants

[Allan Espinosa]

Below's a small modification to run on lower perl versions.  I queried
OSG RESS and most of them are RHEL4 variants.

--- a/modules/provider-coaster/resources/worker.pl
+++ b/modules/provider-coaster/resources/worker.pl
@@ -134,7 +134,8 @@ sub hts {
 sub reconnect() {
        my $fail = 0;
        my $any;
-       my $i, $j;
+       my $i;
+       my $j;
        for ($i = 0; $i < MAX_RECONNECT_ATTEMPTS; $i++) {
                wlog INFO, "Connecting ($i)...\n";
                my $sz = @HOSTNAME;
[aespinosa at communicado resources]$ perl --version

This is perl, v5.8.5 built for x86_64-linux-thread-multi

Copyright 1987-2004, Larry Wall

Perl may be copied only under the terms of either the Artistic License or the
GNU General Public License, which may be found in the Perl 5 source kit.

Complete documentation for Perl, including FAQ lists, should be found on
this system using `man perl' or `perldoc perl'.  If you have access to the
Internet, point your browser at http://www.perl.com/, the Perl Home Page.


i don't know enough perl kung-fu to fix this one though :(

[aespinosa at communicado resources]$ perl -c worker.pl
Global symbol "$SCHEME" requires explicit package name at worker.pl line 189.
Global symbol "$HOSTNAME" requires explicit package name at worker.pl line 189.
Global symbol "$PORT" requires explicit package name at worker.pl line 189.
worker.pl had compilation errors.

--