Hello there.
On upload file there a code:
if ($UpFile ne "")
{
$FileName = $MemberID;
$newmain = $FileName;

This one only put members ID without ext .gif like 000012, but if i replace:

$FileName = $MemberID.gif;
$newmain = $FileName;

This one put members ID gif without . "dot" like 000012gif. I'm not good in perl. Is there the way that i can modify with ext .gif like 000012.gif. Thank in advance for your help.

$FileName = "$MemberID.gif";

or

$FileName = $MemberID . '.gif';

Without the quotes, the . concatenates (combines).

--mark

Thank you Mark.