my $file_contents_as_scalar = do{local $/;<FILEHANDLE>};

##</code><code>##

$_->{field} = $var for @object;