Devel::INC::Sorted - Keep your hooks in the begining of
use Devel::INC::Sorted qw(inc_add_floating); inc_add_floating( \&my_inc_hook ); unshift @INC, \&other_hook; use lib 'blah'; push @INC, 'foo'; warn $INC; # this is still \&my_inc_hook warn $INC; # but \&other_hook was moved down to here
This module keeps
@INC sorted much like Tie::Array::Sorted.
The default comparator partitions the members into floating and non floating, allowing you to easily keep certain hooks in the begining of
The sort used is a stable one, to make sure that the order of
@INC for unsorted items remains unchanged.
All exports are optional
Add entries to
@INC and call
inc_float_entry on them.
Mark the arguments as floating (in the internal refhash).
Remove the items from the hash.
@INC, leaving all it's current elements in place. Further modifications to
@INC will not cause resorting to happen.
This module is maintained using Darcs. You can get the latest version from http://nothingmuch.woobling.org/code, and use
darcs send to commit changes.
Yuval Kogman <email@example.com>
Copyright (c) 2008 Yuval Kogman. All rights reserved This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.