$propertie­s->SetProp­erty('titl­e',$filename);                

##</code><code>##

$properties->{'title'} = $filenam3;