Section: User Contributed Perl Documentation (3pm)
use File::MimeInfo::Magic; my $mime_type = mimetype($file);
This module inherits from File::MimeInfo, it is transparent to its functions but adds support for the freedesktop magic file.Magic data is hashed when you need it for the first time. If you want to force hashing earlier use the
"mimetype"is exported by default. The methods
"describe"can be exported on demand.
See also File::MimeInfo for methods that are inherited.
$file, returns undef on failure.
"magic()". Magic rules with an priority of 80 and higher are checked before
"globs()"is called, all other magic rules afterwards. If this doesn't work the file is read and the mime-type defaults to 'text/plain' or to 'application/octet-stream' when the first ten chars of the file match ascii control chars (white spaces excluded). If the file doesn't exist or isn't readable
"undef"is returned. If
$fileis an object reference only
"magic"and the default method are used. See below for details.
$filebased on the magic rules, returns undef on failure.
$filecan be an object reference, in that case it is supposed to have a
"read()"method. This allows you for example to determine the mimetype of data in memory by using IO::Scalar. Be aware that when using a filehandle or an
"IO::"object you need to set the
":utf8"binmode yourself if appropriate.
@File::MimeInfo::DIRS. But normally it is better to change the XDG basedir environment variables.
Copyright (c) 2003, 2012 Jaap G Karssenberg. All rights reserved. This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
Tutoriais de Tecnologia Web