hand sanitizers for under 1.00
Dictionary 1.00
Every site needs a dictionary. . . for all the special terms and words which are unique to your own industry. Easy to set up and manage, your users will love having access to those hard to understand more>>
This is a great way to get repeat visitors!If the subject matter of your site contains words or phrases which are unique to your industry, why not place a searchable dictionary on your site?Upload a text file with your words and definitions along with the script and soon youll have a searchable dictionary. There is a feature to allow clickable links to other terms within the dictionary which are displayed with the definitions. This is great for music sites, which have their own unique Latin, French, and German terms, as well as medical sites, mechanical sites, and much more!Registered Version comes with support and unlimited updates.
Requirements: Perl, Webserver
<<lessHTML::Sanitizer 0.04
HTML::Sanitizer is a HTML Sanitizer. more>>
SYNOPSIS
my $safe = new HTML::Sanitizer;
$safe->permit_only(
qw/ strong em /,
a => {
href => qr/^(?:http|ftp):/,
title => 1,
},
img => {
src => qr/^(?:http|ftp):/,
alt => 1,
},
b => HTML::Element->new(strong),
);
$sanitized = $safe->filter_html_fragment($evil_html);
# or
my $tree = HTML::TreeBuilder->new->parse_file($filename);
$safe->sanitize_tree($tree);
ABSTRACT
This module acts as a filter for HTML. It is not a validator, though it might be possible to write a validator-like tool with it. Its intended to strip out unwanted HTML elements and attributes and leave you with non-dangerous HTML code that you should be able to trust.

Free Style for Linux 1.0
Free Style is a cute and colorful set that contains 10 icons more>> Description:
10 freeware icons designed in cartoon style.
Content:
Books, Bug, Car, CD, Cup, Flower, Hand, Ice Cream, Pencil, Tree<<less
Vivid Saturation 1.00
Vivid Saturation plugin uses channel mixer to increase saturation of the image. more>>
There are implementations of this plugin for The Other Product, and they are often called Digital Velvia or Velvian Colors. For GIMP I couldnt find such a plugin though, so I created my own.
List::Intersperse 1.00
List::Intersperse Perl module can intersperse / unsort / disperse a list. more>>
SYNOPSIS
use List::Intersperse qw/intersperseq/;
@ispersed = intersperseq {substr($_[0],0,1)} qw/A1 A2 B1 B2 C1 C2/;
@ispersed = List::Intersperse::intersperse qw/A A B B B B B B C/;
intersperse and intersperseq evenly distribute elements of a list. Elements that are considered equal are spaced as far apart from each other as possible.
FUNCTIONS
intersperse LIST
This function returns a list of elements interspersed so that equivalent items are evenly distributed throughout the list.
intersperseq BLOCK LIST
intersperseq works like intersperse but it applies BLOCK to the elements of LIST to determine the equivalance key.
Apache-Storage 1.00
Apache::Storage is Perl module containing simple functions to store and retrieve information from within the Apache process. more>>
Chess::FIDE 1.00
Chess::FIDE is a Perl extension for FIDE Rating List. more>>
SYNOPSIS
use Chess::FIDE;
my $fide = Chess::FIDE->new(-file=>filename);
$fide->fideSearch("surname eq Kasparov");
Chess::FIDE - Perl extension for FIDE Rating List. FIDE is the International Chess Federation that every quarter of the year releases a list of its rated members. The list contains about fifty thousand entries. This module is designed to parse its contents and to search across it using perl expressions. A sample list from April 2004 is provided under filename APR04FRL.TXT The following methods are available:
Constructor
$fide = new Chess::FIDE(-file=>localfile); $fide = new Chess::FIDE(-www=>1,[-proxy=>proxyaddress]);
There are two types of constructors - one takes a local file and another one retrieves the up-to-date zip file from the FIDE site, unzips it on the fly and parses the output immediately. In case of the second constructor no files are created. Also usage of an optional proxy is possible in the second case.
Each player entry in the file is scanned against a regexp and then there is a post-parsing as well which is implemented in function parseLine. The entry is then stored in an object defined by the module Chess::FIDE::Player (see its documentation). Every new object is inserted as a hash member where the FIDE ID of the player is the key. A sparse array could be used instead, though.
fideSearch
@result = $fide->fideSearch("perl conditional");
Example: @result = $fide->fideSearch("surname eq Kasparov");
Searches the fide object for entries satisfying the conditional specified as the argument. The conditional MUST be a PERL expression within double quotes. All constant strings should be expressed within single quotes because the conditional is evaled against each entry. Any conditional including a regexp match that may be eval-ed is valid. For the fields to use in conditionals see Chess::FIDE::Player documentation.
Smart Sharpening 1.00
Smart Sharpening plugin is a method of sharpening, which sharpens only the edges in the image. more>>
You can find more details on smart sharpening here at gimpguru.org.
Notice that the amount of sharpness is equal, but there is notably less noise. You can see that especially, when you look the hand of the guitar player.
Dynamic Range Extender 1.00
Dynamic Range Extender takes two images and creates one composite image, which supposedly has increased dynamic range. more>>
With digital SLR cameras you can often use RAW format, which lets user select the exposure correction afterwards. The sample here is from Canon 10D.
Installation:
Just copy the script to your GIMP scripts directory. Usually this is ~/.gimp-2.0/scripts, but if you want to use the script system-wide then the directory might be something like /usr/share/gimp/2.0/scripts.
sipscreen 1.00
sipscreen project is a Linux iptables QUEUE target handler written in perl for screening incoming SIP phone calls. more>>
If you have a network configuration similar to mine, with a Vonage or other Voice-over-IP adapter located behind a Linux gateway, you may find sipscreen useful for programmatically accepting or rejecting inbound calls, based on the caller ID information, the time of day, or any other clever algorithm you can think of.
Cairo 1.00
Cairo package contains Perl bindings to the cairo graphics library. more>>
INSTALLATION
To install this module type the following:
perl Makefile.PL
make
make test
make install
To avoid installing to a system directory, if you dont have root access, you can change the installation prefix at Makefile.PL time with
perl Makefile.PL PREFIX=/some/other/place
This will install the module to the subdirectory lib/perl5 under the given prefix. If this is not already in perls include path, youll need to tell perl how to get to this library directory so you can use it; there are three ways:
in your environment (the easiest):
# assuming a bourne-style shell
PERL5LIB=/some/other/place/lib/perl5/site_perl export PERL5LIB
on the perl command line:
perl -I /some/other/place/lib/perl5/site_perl yourscript
in the code of your perl script:
use lib /some/other/place/lib/perl5/site_perl;
Number::Encode 1.00
Number::Encode is a Perl module to encode bit strings into digit strings. more>>
SYNOPSIS
use Number::Encode qw(nonuniform uniform);
Provides a mechanism to convert arbitrary bit-strings into numeric digit strings. The transformation can be uniform or non-uniform depending on the type of distribution of the numeric digits achieved.
The former approach is useful for security-related applications such as calling cards and the such, which require a uniform digit distribution. The algorythm used to generate uniform distributions, while deterministic, is more constly than the non-uniform variant.
This module is distributed under the same terms and warranty as Perl itself.
Tie::CharArray 1.00
Tie::CharArray module can access Perl scalars as arrays of characters. more>>
SYNOPSIS
use Tie::CharArray;
my $foobar = a string;
tie my @foo, Tie::CharArray, $foobar;
$foo[0] = A; # $foobar = A string
push @foo, !; # $foobar = A string!
print "@foon"; # prints: A s t r i n g !
tie my @bar, Tie::CharArray::Ord, $foobar;
$bar[0]--; # $foobar = @ string!
pop @bar; # $foobar = @ string
print "@barn"; # prints: 64 32 115 116 114 105 110 103
Alternative interface functions
use Tie::CharArray qw( chars codes );
my $foobar = another string;
my $chars = chars $foobar; # arrayref in scalar context
push @$chars, ?; # $foobar = another string?
$_ += 2 for codes $foobar; # tied array in list context
# $foobar = cpqvjgt"uvtkpiA
my @array = chars $foobar; # WARNING: @array isnt tied!
In low-level programming languages such as C, and to some extent Java, strings are not primitive data types but arrays of characters, which in turn are treated as integers. This closely matches the internal representation of strings in the memory.
Perl, on the other hand, abstracts such internal details away behind the concept of scalars, which can be treated as either strings or numbers, and appear as primitive types to the programmer. This often better matches the way people think about the data, which facilitates programming by making common high-level manipulation tasks trivial.
Sometimes, though, the low-level view is better suited for the task at hand. Perl does offer functions such as ord()/chr(), pack()/unpack() and substr() that can be used to solve such tasks with reasonable efficiency. For someone used to the direct access to the internal representation offered by other languages, however, these functions may feel awkward. While this is often only a symptom of thinking in un-Perlish terms, sometimes being able to manipulate strings as character arrays really does simplify the code, making the intent more obvious by eliminating syntactic clutter.
This module provides a way to manipulate Perl strings through tied arrays. The operations are implemented in terms of the aforementioned string manipulation functions, but the programmer normally need not be aware of this. As Perl has no primitive character type, two alternative representations are provided:
Devel::Pointer 1.00
Devel::Pointer is a Perl module that can fiddle around with pointers. more>>
SYNOPSIS
use Devel::Pointer;
$a = address_of($b); # a = &b;
$b = deref($a); # b = *a;
$a = unsmash_sv(0+$scalar_ref);
@a = unsmash_av(0+$array_ref);
%a = unsmash_hv(0+$hash_ref);
&a = unsmash_cv(0+$code_ref);
# OK, you cant do that, but you get the idea
$c = deref(-1); # *(-1), and the resulting segfault.
The primary purpose of this is to turn a smashed reference address back into a value. Once a reference is treated as a numeric value, you cant dereference it normally; although with this module, you can.
Be careful, though, to avoid dereferencing things that dont want to be dereferenced.
Salat Book 1.00
Salat Book gives you the wonderful choice of a Salat / Namaz prayer database and tracking application. more>>
Salat Book 1.00 gives you the wonderful choice of a Salat / Namaz prayer database and tracking application. It is using month calendars, salat completion datagrid, statistics and graphs and is specially useful for Kaza (missed Salat) prayers.
Enhancements:
- Statistics filter & Graphs flter now changed to single Date Filter.
- Date Filter now enabled for Pie Charts & Bar Chart.
- Removal of Error Statistics debugging pop-ups with grand total stats.
- Graphs Bar Chart legend moved to top left.
- Application window & components resized & compacted for better visibility on
- lower resolution screens.
- Prayer Tab Salat selection button highlighting added.
- Prayer Tab Month datagrid...absent salah colour changed from light red/pink
- red to a darker red.
- Options Tab Backup function now enabled.
- Options Tab Restore function now enabled.
- Options Tab Error removal on Edit/Save function, corrupting data files.
- Application data files integrity check & repair code added during startup.
Requirements:
- Adobe AIR