Re^4: passing vars to a sub

Select or download this

print "first pass",br;
get_status("cups", "rlinux1");
print "second pass",br;
get_status($SERVERS[$rev_srv_num{$SERVER}]->[2], $SERVER);

Select or download this

you passed cups for server rlinux1 
RSPARE-35 TFIEDLER 117760 Wed Mar 9 16:58:54 2005 
...
RSPARE-45 TFIEDLER 34816 Fri Mar 11 10:23:08 2005 
second pass
you passed cups for server rlinux1

Select or download this

first pass
you passed cups for server rlinux1

Select Code to Download