$foo = { clean => 'filename.txt' };
$foo->{dirty} = <>;