Здравствуйте!У меня в скрипте загрузки файлов на сайт возникает ошибка с MIME. Вот скрипт
#!/usr/bin/perl -w
use strict;
use CGI qw(:standard);
$CGI::POST_MAX=1024*250;
my $filename=param("filename");
my $mime=uploadInfo($filename)->{Content-Type};
...........
...........
А ошибка возникает на строке с "my $mime.....". Вот текст ошибки:
Bareword "Content" not allowed while "strict subs" in use at ... line
Bareword "Type" not allowed while "strict subs" in use at ... line
Execution of /путь/к/cкрипту/ aborted due to complition errors
Как мне устранить ошибку???