/ 
perl-5.41.3
⭐ Starred 2013
/ encguess
Security Advisories (1)
CVE-2025-40909 (2025-05-30)

Perl threads have a working directory race condition where file operations may target unintended paths. If a directory handle is open at thread creation, the process-wide current working directory is temporarily changed in order to clone that handle for the new thread, which is visible from any third (or more) thread already running. This may lead to unintended operations such as loading code or accessing files from unexpected locations, which a local attacker may be able to exploit. The bug was introduced in commit 11a11ecf4bea72b17d250cfb43c897be1341861e and released in Perl version 5.13.6

NAME

encguess - guess character encodings of files

VERSION

$Id: encguess,v 0.4 2023/11/10 01:10:50 dankogai Exp $

SYNOPSIS

encguess [switches] filename...

SWITCHES

-h

show this message and exit.

-s

specify a list of "suspect encoding types" to test, separated by either : or ,

-S

output a list of all acceptable encoding types that can be used with the -s param

-u

suppress display of unidentified types

EXAMPLES:

  • Guess encoding of a file named test.txt, using only the default suspect types.

    encguess test.txt

  • Guess the encoding type of a file named test.txt, using the suspect types euc-jp,shiftjis,7bit-jis.

    encguess -s euc-jp,shiftjis,7bit-jis test.txt
encguess -s euc-jp:shiftjis:7bit-jis test.txt

  • Guess the encoding type of several files, do not display results for unidentified files.

    encguess -us euc-jp,shiftjis,7bit-jis test*.txt

DESCRIPTION

The encoding identification is done by checking one encoding type at a time until all but the right type are eliminated. The set of encoding types to try is defined by the -s parameter and defaults to ascii, utf8 and UTF-16/32 with BOM. This can be overridden by passing one or more encoding types via the -s parameter. If you need to pass in multiple suspect encoding types, use a quoted string with the a space separating each value.

SEE ALSO

Encode::Guess, Encode::Detect

LICENSE AND COPYRIGHT

Copyright 2015 Michael LaGrasta and Dan Kogai.

This program is free software; you can redistribute it and/or modify it under the terms of the Artistic License (2.0). You may obtain a copy of the full license at:

http://www.perlfoundation.org/artistic_license_2_0