my $call = `mminfo -r 'volume,state,written,%used,space,pool,location,ssinsert' -q 'ssinsert <= three week ago`;
foreach ($call) {
  if ( $call =~ /Daily\S+\s/) {
    print "Daily true $_ .\n";
  }
  else {
    print "not found\n ";
  }
}