Select Code to Download

#!/usr/bin/perl 

...
$dbh -> disconnect ();

}

Can't use string (""06/19/2006","23:59:48","CSCVPN0") as an ARRAY ref 
+while "strict refs" in use at try1.pl line 60, <LOG> line 1048.

"06/19/2006","23:59:48","CSCVPN01","Stop","Unknown","Unknown","bmikulk
+a","172.22.0.5","946674","8","1","172.22.0.85","255.255.224.0",,,,,,,
+,,,,,"ou=pcna","82800","900",,,,"CSCVPN01",,"2","14","108311","503278
+","000E71F2",,"248","806","821",,,,"5",,"9",,,,,,,,,,,,,,,,,,,,,,,,,,
+,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,
...
"06/19/2006","23:59:57","DFWVPN01M.PBSG.PVT","Stop","Unknown","Unknown
+","02036855","172.21.0.5","2042739","8","1","172.21.0.100","255.255.2
+24.0",,,,,,,,,,,,"ou=troppilot","82800","900",,,,"DFWVPN01M.PBSG.PVT"
+,,"2","9","7621521","15661250","001F2B73",,"4147","29079","27876",,,,
+"5",,"9",,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,
+,,,,,,

"06/20/2006","00:00:06","CSCVPN01","Stop","Unknown","Unknown","0117152
+5","172.22.0.5","946672","8","1","172.22.0.73","255.255.224.0",,,,,,,
+,,,,,"ou=pcna","82800","900",,,,"CSCVPN01",,"2","11","125891","157892
+","000E71F0",,"447","621","560",,,,"5",,"9",,,,,,,,,,,,,,,,,,,,,,,,,,
+,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,