Problem with uploaded (http) files with File::MMagic

Select or download this

    use File::MMagic;

...
    my $res = $mm->checktype_filehandle($fh);
    print "$res\n";

Select or download this

Invalid type 'regex' at line 271
Can't use an undefined value as an ARRAY reference at /usr/lib/perl5/s
+ite_perl/5.8.8/File/MMagic.pm line 767, <GEN0> line 276.

Select or download this

perl -MFile::MMagic -le 'print $File::MMagic::VERSION'

Select or download this

uname -a
Linux xxx.com 2.6.18-238.12.1.el5 #1 SMP Tue May 31 13:22:04 EDT 2011 
+x86_64 x86_64 x86_64 GNU/Linux

Select or download this

Linux xxx.com 2.6.18-028stab095.1-ent #1 SMP Mon Oct 24 20:45:18 MSD 2
+011 i686 i686 i386 GNU/Linux

Select Code to Download