$VAR1 = [
          bless( \*{'Fh::fh00001multiuploads/a.txt'}, 'Fh' ),
          bless( \*{'Fh::fh00002multiuploads/Copy of a.txt'}, 'Fh' ),
          bless( \*{'Fh::fh00003multiuploads/Copy (2) of a.txt'}, 'Fh' )
        ];
$VAR1 = [
          bless( \*{'Fh::fh00001multiuploads/a.txt'}, 'Fh' ),
          bless( \*{'Fh::fh00002multiuploads/Copy of a.txt'}, 'Fh' ),
          bless( \*{'Fh::fh00003multiuploads/Copy (2) of a.txt'}, 'Fh' )
        ];


step0
Upload this please -- multiuploads/a.txt

this is a.txt


Upload this please -- multiuploads/Copy of a.txt

this is a.txt


Upload this please -- multiuploads/Copy (2) of a.txt

this is a.txt

Name -- a
Email -- b
Comments -- ok