sub get_remote_file {
      print "Retrieving data file...";
      my @site_data;
      chomp( @site_data = `$conx` );
      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 = ();
    }

##</code><code>##

foreach $client ( @clients ) {
  my ( %site_data, %office_data );
  print "Performing Sentinel check on $client\n";
  get_client_configs( $client );
  print "Retrieving data from site...\n";
  get_remote_file;
  generate_local_data;
  compare_files;
  print "Completed Sentinel check on $client\n";
}