$filename =~ /(.*?)\.(.*?)$/;
$id = $1;
$ext = $2;