if( my $soy = $searches{sauce} ){
  print int(@$soy);
}
[download]