#!/usr/bin/perl

use warnings;
use strict;

sub latest {
       my $late = `ssh root\@10.10.21.15 'cat /usr/local/qualys/LATEST_VULNSIGS'`;
                chomp($late);
                print "$late\n";
           }
return $late;