my $data = do {local $/; <FILE>};
$data =~ s/"//g;