revision=something <--newline at end of line
version=something <--newline at end of line
type=something <--newline at end of line
key1=64 characters <--newline at end of line
key2=32 character <--search will stop before going to newline
####
if ($string =~ "$var $var1 $var2"){
seek ( $keys, 4, 0 );
read ( $keys, $temp1, 64 );
seek ( $keys, 4, 0 );
read ( $keys, $temp2, 32 );
####
$string =~ "$var $var1 $var2"
####
$string =~ "$var\n $var1\n $var2"