The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

File::Locate - Search the locate-database from Perl

SYNOPSIS

    use File::Locate;

    print join "\n", locate "mp3", "/usr/var/locatedb";

    # or only test of something is in the database

    if (locate("mp3", "/usr/var/locatedb")) {
        print "yep...sort of mp3 there";
    }

ABSTRACT

    Search the locate-database from Perl

DESCRIPTION

File::Locate provides the locate() function that scans the locate database for a given substring. It is almost a literal copy of locate(1L) written in fast C (or rather: fast C copied).

FUNCTIONS

  • locate($substring, [ $database, $coderef ])

    Scans a locate-db file for a given $substring. $substring may contain globbing-characters. locate() can take two additional parameters. A string is taken to be the $database that should be searched:

        print locate "*.mp3", "/usr/var/locatedb";

    If you omit $database, locate() first inspects the environment variable $LOCATE_PATH. If it is set, it uses this value. Otherwise it will use the default locate-db file that was compiled into the module. If this one is bogus, it will give up in which case you have to pass $database.

    $coderef can be a reference to a subroutine that is called for each found entry with the entry being passed on to this subroutine. This will print each found entry as it appears (that is, no large list has to be built first):

        locate "*.mp3", "/usr/var/locatedb", sub { print $_[0], "\n" };
    
        # or
         
        sub dump {
            print $_[0], "\n";
        }
        locate "*.mp3", "/usr/var/locatedb", \&dump;

    The order in which the second and third parameter appear is up to you. locate() distinguishes on the type: a string is $database and a CODE-reference always the $coderef.

    In list context it returns all entries found. In scalar context, it returns a true or a false value depending on whether any matching entry has been found. It is a short-cut performance-wise in that it immediately returns after anything has been found.

    If $coderef is provided, the function never returns anything regardless of context.

EXPORT

locate() is exported by default. If you don't want that, then pull in the module like that:

    use File::Locate ();

You have to call the function fully qualified in this case: File::Locate::locate().

SEE ALSO

The manpages of your locate(1L) program if available.

AUTHOR

Tassilo von Parseval <tassilo.von.parseval@rwth-aachen.de>

COPYRIGHT AND LICENSE

Copyright 2003 by Tassilo von Parseval

This program is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 2, or (at your option) any later version.