Sub

TGG is an image collection thumbnail website generator which goes recursively thru all sub-folders of a chosen location on your hard drive. You can use it to create a web page of all your photos almost instantly. As options you can choose to display the image name, file size in bytes and other...

Every hard disk is too small if you just wait long enough. TreeSize Free tells you where precious space has gone to. TreeSize Free can be started from the context menu of a folder or drive and shows you the size of this folder, including its sub folders. Each folder can be expanded in...

DiskCleaner utility shows you exactly where your free space has gone, in a matter of seconds it calculates recursive folder sizes (including all files and sub-folders) for all folders on the entire NTFS drive. It drills down through any folder to its subfolders and helps identify space-hungry...


Platforms: Windows

Constantly searching for misplaced shortcuts on your Desktop, Desktop sub-folders, Start Menu, Internet Favorites menu, etc.? This program helps you find misplaced shortcuts or any other types of files quickly and easily in any combination of Windows most commonly used shell locations such as...


Platforms: Windows

ViceVersa compares and synchronizes files and folders (including sub-folders) using three comparison types: Size and Timestamp, CRC or both. Powerful include and exclude file filters. Handles NTFS and FAT timestamp differences. Five file synchronization methods. Supports copy and delete for...


Platforms: Windows

Benchmark::Forking is a Perl module to run benchmarks in separate processes. SYNOPSIS use Benchmark::Forking qw( timethis timethese cmpthese ); timethis ($count, "code"); timethese($count, { Name1 => sub { ...code1... }, Name2 => sub { ...code2... }, }); cmpthese($count, { Name1 =>...


Platforms: *nix

ReleaseAction - call actions upon release. SYNOPSIS use ReleaseAction on_release; { # OO style my $handle = ReleaseAction->new( sub {print "Exiting scopen"} ); print "In scopen"; } { # Functional style my $handle = on_release {print "Exiting scopen"}; print "In scopen"; } { my...


Platforms: *nix

Test::Stochastic is a Perl module to check probabilities of randomized methods. SYNOPSIS use Test::Stochastic qw(stochastic_ok); stochastic_ok sub { ...random sub...}, {a => 0.4, b => 0.6}; stochastic_ok {a => 0.4, b => 0.6}, sub { ...random sub...}; Test::Stochastic::setup(times => 100,...


Platforms: *nix

Sort::Half::Maker is a Perl module to create half-sort subs easily. SYNOPSIS use Sort::Half::Maker qw(make_halfsort); $sub = make_halfsort( start => [ qw(x y z) ], end => [ qw(a b c) ], fallback => sub { $_[0] cmp $_[1] }, ); @list = sort $sub qw(a y f h w z b t x); # qw(x y z f h t w...


Platforms: *nix

Test::Exception is a Perl module to test exception based code. SYNOPSIS use Test::More tests => 5; use Test::Exception; # or if you dont need Test::More use Test::Exception tests => 5; # then... # Check that something died dies_ok { $foo->method1 } expecting to die; # Check that...


Platforms: *nix

Tree::BPTree is a Perl implementation of B+ trees. SYNOPSIS use Tree::BPTree; # These arguments are actually the defaults my $tree = new Tree::BPTree( -n => 3, -unique => 0, -keycmp => sub { $_[0] cmp $_[1] }, -valuecmp => sub { $_[0] <=> $_[1] }, ); # index the entries in this...


Platforms: *nix

POE::Component::Proxy::TCP is a simplified TCP proxy. SYNOPSIS use POE qw(Component::Proxy::TCP); POE::Component::Proxy::TCP->new (Alias => "ProxyServerSessionAlias", Port => $local_server_port, OrigPort => $remote_server_port, OrigAddress => $remote_server_host, DataFromClient =>...


Platforms: *nix

IPC::PubSub is Perl module for Interprocess Publish/Subscribe channels. SYNOPSIS # A new message bus with the DBM::Deep backend # (Other possible backends include Memcached and PlainHash) my $bus = IPC::PubSub->new(DBM_Deep => /tmp/pubsub.db); # A channel is any arbitrary string my...


Platforms: *nix

App::Modular::Module::Events is a Perl module with event handling for App::Modular compatible applications. SYNOPSIS #################################################################### package App::Modular::Module::Me; use base qw(App::Modular::Module); sub depends { return Events; }...


Platforms: *nix

Tapestry JSCookMenu provides a component for the Apache Tapestry Web framework that makes it possible to create JavaScript menus and navigation sidebars easily with an arbitrary number of hierarchical pop up sub menus. The famous JavaScript "JSCookMenu", written by Heng Yuan, is encapsulated...


Platforms: *nix

FUSE::Server is a Perl-FUSE server. SYNOPSIS use FUSE::Server; my $s = FUSE::Server->new({ Port=>35008, MaxClients=>5000, Quiet=>1, }); my $status = $s->bind(); print "Server started: $status"; $s->addCallback(BROADCASTALL,&msg_broadcast);...


Platforms: *nix

Test::Unit::TestCase is a unit testing framework base class. SYNOPSIS package FooBar; use base qw(Test::Unit::TestCase); sub new { my $self = shift()->SUPER::new(@_); # your state for fixture here return $self; } sub set_up { # provide fixture } sub tear_down { # clean up after...


Platforms: *nix

Sendmail::Milter is a Perl interface to sendmails Mail Filter API. SYNOPSIS use Sendmail::Milter; my %my_milter_callbacks = ( connect => &my_connect_callback, helo => &my_helo_callback, envfrom => &my_envfrom_callback, envrcpt => &my_envrcpt_callback, header => &my_header_callback,...


Platforms: *nix

Class::Observable is a Perl module that allows other classes and objects to respond to events in yours. SYNOPSIS # Define an observable class package My::Object; use base qw( Class::Observable ); # Tell all classes/objects observing this object that a state-change # has occurred sub...


Platforms: *nix

Test::Unit::Procedural Perl module contains a procedural style unit testing interface. SYNOPSIS use Test::Unit::Procedural; # your code to be tested goes here sub foo { return 23 }; sub bar { return 42 }; # define tests sub test_foo { assert(foo() == 23, "Your message here"); } sub...


Platforms: *nix