#after dumping file to string $file_str=~ s/(float|float2|float3|float4|string)\s+/$+\#/g; $file_str =~ s/\s*//g;