sub get_remote_file {
      print "Retrieving data file...";
      my @site_data;
print Dumper( $conx );
      chomp( @site_data = `$conx` );
print Dumper( @site_data );
      if ( $? >> 8 ) {
        print "Failed!\n";
      } else{
        print "Success!\n";
      }
      for $line( @site_data ) {
        ( $name, $filepath, $mod, $md5 ) = split( "\,", $line );
        $site_data{$name} = ["$filepath", "$mod", "$md5"];
      }
      @site_data = ();
    }