@lines = split/(float|float2|float3|float4)\#\<.*\>=.*\;/,$file_str;