if ($string =~ "$var $var1 $var2"){
    seek ( $keys, 4, 0 );
    read ( $keys, $temp1, 64 );
    seek ( $keys, 4, 0 );
    read ( $keys, $temp2, 32 );