sub image_path { my ($id, $image) = @_; my ($mydate) = $dbh->selectrow_array( "SELECT time FROM offerte WHERE id=$id" ); return "/images.cgi/${id}_${image}_${mydate}.jpg"; }