@array1 = ("cat","rat","lion");
@array2 = ("dog","tiger");
$variable = "tiger";
%hash= ("tiger" => 'peacock', "2" => 'tiger');
map{print $_."\n" if($_ eq 'tiger')}(@array1,@array2,$variable,%hash);
####
@array1 = ("cat","rat","lion");
@array2 = ("dog","tiger");
$variable = "horse";
%hash= ("1" => 'peacock', "2" => 'duck') ;
map{print $_ if($_ eq 'tiger')}(@array1,@array2,$variable,%hash);
####
@array1 = ("cat","rat","lion");
@array2 = ("dog","tiger");
$variable = "tiger";
%hash= ("1" => 'peacock', "2" => 'tiger');
map{print $_."\n" if($_ eq 'tiger')}(@array1,@array2,$variable,%hash);