snipper 0.06
Sponsored Links
Sponsored Links
Secleted [ 0 ] software to compare
Results 1 - 15 of about 87
Search::Tools::Snipper 0.06
Search::Tools::Snipper is a Perl module to extract keywords in context. more>>
Search::Tools::Snipper is a Perl module to extract keywords in context.
SYNOPSIS
my $query = [ qw/ quick dog / ];
my $text = the quick brown fox jumped over the lazy dog;
my $s = Search::Tools::Snipper->new(
occur => 3,
context => 8,
word_len => 5,
max_chars => 300,
query => $query
);
print $s->snip( $text );
Search::Tools::Snipper extracts keywords and their context from a larger block of text. The larger block may be plain text or HTML/XML.
<<lessSYNOPSIS
my $query = [ qw/ quick dog / ];
my $text = the quick brown fox jumped over the lazy dog;
my $s = Search::Tools::Snipper->new(
occur => 3,
context => 8,
word_len => 5,
max_chars => 300,
query => $query
);
print $s->snip( $text );
Search::Tools::Snipper extracts keywords and their context from a larger block of text. The larger block may be plain text or HTML/XML.
Download (0.048MB)
Added: 2006-10-18 License: Perl Artistic License Price:
1101 downloads
sqlpp 0.06
sqlpp Perl package is a SQL preprocessor. more>>
sqlpp Perl package is a SQL preprocessor.
sqlpp is a conventional cpp-alike preprocessor taught to understand SQL ( PgSQL, in particular) syntax specificities. In addition to the standard #define/#ifdef/#else/#endif cohort, provides also #perldef for calling arbitrary perl code.
SYNOPSIS
sqlpp [options] filename
options:
-I path - include path
-D var[=value] - define variable
-o output - output to file ( default to stdout )
-h,--help - display this text
-hh - display man page
SYNTAX
#define TAG
Identical to cpp
#define TAG([PARAMETERS]) MACRO
Not fully identical to cpp, the behavior is slightly different. Concatenation ( a ## b ) and stringification ( # a ) behave similar to as in cpp.
The multiline macro can be declared either tranditionally via CPP backslash line continuation, or a perls heredoc style. In the latter case, TAG must be prepended with<<less
sqlpp is a conventional cpp-alike preprocessor taught to understand SQL ( PgSQL, in particular) syntax specificities. In addition to the standard #define/#ifdef/#else/#endif cohort, provides also #perldef for calling arbitrary perl code.
SYNOPSIS
sqlpp [options] filename
options:
-I path - include path
-D var[=value] - define variable
-o output - output to file ( default to stdout )
-h,--help - display this text
-hh - display man page
SYNTAX
#define TAG
Identical to cpp
#define TAG([PARAMETERS]) MACRO
Not fully identical to cpp, the behavior is slightly different. Concatenation ( a ## b ) and stringification ( # a ) behave similar to as in cpp.
The multiline macro can be declared either tranditionally via CPP backslash line continuation, or a perls heredoc style. In the latter case, TAG must be prepended with<<less
Download (0.010MB)
Added: 2007-05-30 License: Perl Artistic License Price:
877 downloads
jlirc 0.06
jlirc is a Java client API for the LIRC and WINLirc programs. more>>
jlirc is a Java client API for the LIRC and WINLirc programs. jlirc lets developers add IR remote control support to Java applications.
<<less Download (0.048MB)
Added: 2006-07-28 License: GPL (GNU General Public License) Price:
1186 downloads
pmping 0.06
pmping provides a parallel multiple host ping with audible results (beep on the PC speaker). more>>
pmping provides a parallel multiple host ping with audible results (beep on the PC speaker).
pmping is a script that pings multiple hosts in parallel and gives audible results depending on host state.
The sounds come from the internal PC speaker, thus not needing a sound card. It beeps when a host OS is losing many packets, or when it is down.
If the host is down, the script can send an email notification or run a command. All aspects are fully customisable by the user.
Main features:
- Logs notifications to standard output.
- Reloads config file on-the-fly.
- Ability to run a command when a host is down.
- Sends e-mail notifications when a host is down and when it comes up.
Enhancements:
- Corrected dynamic config reload (wasnt really working).
- Try to catch SMTP connection errors when sending notification e-mails.
- Changed the way we check network errors (regex was not working).
<<lesspmping is a script that pings multiple hosts in parallel and gives audible results depending on host state.
The sounds come from the internal PC speaker, thus not needing a sound card. It beeps when a host OS is losing many packets, or when it is down.
If the host is down, the script can send an email notification or run a command. All aspects are fully customisable by the user.
Main features:
- Logs notifications to standard output.
- Reloads config file on-the-fly.
- Ability to run a command when a host is down.
- Sends e-mail notifications when a host is down and when it comes up.
Enhancements:
- Corrected dynamic config reload (wasnt really working).
- Try to catch SMTP connection errors when sending notification e-mails.
- Changed the way we check network errors (regex was not working).
Download (0.032MB)
Added: 2007-03-15 License: GPL (GNU General Public License) Price:
954 downloads
jsFind 0.06
jsFind is a Perl module that can generate index for full text search engine in JavaScript. more>>
jsFind is a Perl module that can generate index for full text search engine in JavaScript.
SYNOPSIS
use jsFind;
my $t = new jsFind(B => 4);
my $f = 1;
foreach my $k (qw{minima ut dolorem sapiente voluptatem}) {
$t->B_search(Key => $k,
Data => {
"path" => {
t => "word $k",
f => $f },
},
Insert => 1,
Append => 1,
);
}
This module can be used to create index files for jsFind, powerful tool for adding a search engine to a CDROM archive or catalog without requiring the user to install anything.
Main difference between this module and scripts delivered with jsFind are:
You dont need to use swish-e to create index
you can programatically (and incrementaly) create index for jsFind
you can create more than one index and search them using same search.html page
You can also examine examples which come as tests with this module, for example t/04words.t or t/10homer.t.
jsFind
jsFind search engine was written by Shawn Garbett from eLucid Software. The search engine itself is a small piece of JavaScript (1.2 with level 2 DOM). It is easily customizable to fit into a current set of HTML. This JavaScript searches an XML index dataset for the appropriate links, and can filter and sort the results.
JavaScript code distributed with this module is based on version 0.0.3 which was current when this module development started. Various changes where done on JavaScript code to fix bugs, add features and remove warnings. For complete list see Changes file which comes with distribution.
This module has been tested using html/test.html with following browsers:
Mozilla FireFox 0.8 to 1.0
using DOM 2 document.implementation.createDocument
Internet Explorer 5.5 and 6.0
using ActiveX Microsoft.XMLDOM or MSXML2.DOMDocument
Konqueror 3.3
using DOM 2 document.implementation.createDocument
Opera 7.54 (without Java)
using experimental iframe implementation which is much slower than other methods.
If searching doesnt work for your combination of operating system and browser, please open html/test.html file and wait a while. It will search sample file included with distribution and report results. Reports with included test debugging are welcomed.
<<lessSYNOPSIS
use jsFind;
my $t = new jsFind(B => 4);
my $f = 1;
foreach my $k (qw{minima ut dolorem sapiente voluptatem}) {
$t->B_search(Key => $k,
Data => {
"path" => {
t => "word $k",
f => $f },
},
Insert => 1,
Append => 1,
);
}
This module can be used to create index files for jsFind, powerful tool for adding a search engine to a CDROM archive or catalog without requiring the user to install anything.
Main difference between this module and scripts delivered with jsFind are:
You dont need to use swish-e to create index
you can programatically (and incrementaly) create index for jsFind
you can create more than one index and search them using same search.html page
You can also examine examples which come as tests with this module, for example t/04words.t or t/10homer.t.
jsFind
jsFind search engine was written by Shawn Garbett from eLucid Software. The search engine itself is a small piece of JavaScript (1.2 with level 2 DOM). It is easily customizable to fit into a current set of HTML. This JavaScript searches an XML index dataset for the appropriate links, and can filter and sort the results.
JavaScript code distributed with this module is based on version 0.0.3 which was current when this module development started. Various changes where done on JavaScript code to fix bugs, add features and remove warnings. For complete list see Changes file which comes with distribution.
This module has been tested using html/test.html with following browsers:
Mozilla FireFox 0.8 to 1.0
using DOM 2 document.implementation.createDocument
Internet Explorer 5.5 and 6.0
using ActiveX Microsoft.XMLDOM or MSXML2.DOMDocument
Konqueror 3.3
using DOM 2 document.implementation.createDocument
Opera 7.54 (without Java)
using experimental iframe implementation which is much slower than other methods.
If searching doesnt work for your combination of operating system and browser, please open html/test.html file and wait a while. It will search sample file included with distribution and report results. Reports with included test debugging are welcomed.
Download (0.034MB)
Added: 2007-06-20 License: Perl Artistic License Price:
857 downloads
Etk 0.06
Etk is a Perl bindings for the Enlightened ToolKit (Etk). more>>
Etk is a Perl bindings for the Enlightened ToolKit (Etk).
SYNOPSIS
use Etk;
my $win = Etk::Window->new();
my $button = Etk::Button->new();
$button->LabelSet("Click me!");
$win->Add($button);
$win->ShowAll();
$button->SignalConnect("clicked", &clicked_cb);
Etk::Main::Run();
sub clicked_cb
{
print "button clicked!n";
}
This module allows the use of Etk from within Perl. You can use them in one of two ways, either by using the object oriented approach or directly by calling the functions (although this is not recommended).
<<lessSYNOPSIS
use Etk;
my $win = Etk::Window->new();
my $button = Etk::Button->new();
$button->LabelSet("Click me!");
$win->Add($button);
$win->ShowAll();
$button->SignalConnect("clicked", &clicked_cb);
Etk::Main::Run();
sub clicked_cb
{
print "button clicked!n";
}
This module allows the use of Etk from within Perl. You can use them in one of two ways, either by using the object oriented approach or directly by calling the functions (although this is not recommended).
Download (0.055MB)
Added: 2007-05-10 License: Perl Artistic License Price:
906 downloads
ISIC 0.06
ISIC is a suite of utilities to exercise the stability of an IP Stack and its component stacks (TCP, UDP, ICMP et. al.). more>>
ISIC is a suite of utilities to exercise the stability of an IP Stack and its component stacks (TCP, UDP, ICMP et. al.). It generates piles of pseudo random packets of the target protocol.
The packets be given tendancies to conform to. Ie 50% of the packets generated can have IP Options. 25% of the packets can be IP fragments... But the percentages are arbitrary and most of the packet fields have a configurable tendancy.
The packets are then sent against the target machine to either penetrate its firewall rules or find bugs in the IP stack.
It also contains a utility generate raw ether frames to examine hardware implementations.
Other novel uses people have found for ISIC include IDS testing, stack fingerprinting, breaking sniffers and barraging the IRC kiddie.
<<lessThe packets be given tendancies to conform to. Ie 50% of the packets generated can have IP Options. 25% of the packets can be IP fragments... But the percentages are arbitrary and most of the packet fields have a configurable tendancy.
The packets are then sent against the target machine to either penetrate its firewall rules or find bugs in the IP stack.
It also contains a utility generate raw ether frames to examine hardware implementations.
Other novel uses people have found for ISIC include IDS testing, stack fingerprinting, breaking sniffers and barraging the IRC kiddie.
Download (0.027MB)
Added: 2006-03-09 License: GPL (GNU General Public License) Price:
1334 downloads
ICS::Simple 0.06
ICS::Simple is a simple interface to CyberSource ICS2. more>>
ICS::Simple is a simple interface to CyberSource ICS2.
SYNOPSIS
Here is some basic code. Hopefully Ill come back through soon to document it properly.
use ICS::Simple;
my $ics = ICS::Simple->new(
ICSPath => /opt/ics,
MerchantId => v0123456789, # CyberSource supplies this number to you
Mode => test,
Currency => USD,
Grammar => UpperCamel, # defaults to raw ICS responses, so you might want to set this
#ErrorsTo => all-errors@some.fun.place.com,
CriticalErrorsTo => only-critical-errors@some.fun.place.com,
);
my $request = {
OrderId => order19857219,
FirstName => Fred,
LastName => Smith,
Email => fred.smith@buyer-of-stuff.com,
CardNumber => 4111111111111111,
CardCVV => 123,
CardExpYear => 2008,
CardExpMonth => 12,
BillingAddress => 123 Main St,
BillingCity => Olympia,
BillingRegion => WA,
BillingPostalCode => 98501,
BillingCountryCode => US,
ShippingAddress1 => 6789 Industrial Pl,
ShippingAddress2 => Floor 83, Room 11415,
ShippingCity => Olympia,
ShippingRegion => WA,
ShippingPostalCode => 98506,
ShippingCountryCode => US,
ShippingFee => 25.05,
HandlingFee => 5.00,
Items => [
{ Description => Mega Lizard Monster RC,
Price => 25.00,
SKU => prod15185 },
{ Description => Super Racer Parts Kit,
Price => 15.30,
SKU => prod23523 },
{ Description => Uber Space Jacket,
Price => 72.24,
SKU => prod18718 },
],
};
my $response = $ics->requestBill($request);
if ($response->{success}) {
print "Woo! Success!n";
$response = $response->{response};
print "Thanks for your payment of $$response->{BillAmount}.n";
}
else {
print "Boo! Failure!n";
print "Error: $response->{error}->{description}n";
}
<<lessSYNOPSIS
Here is some basic code. Hopefully Ill come back through soon to document it properly.
use ICS::Simple;
my $ics = ICS::Simple->new(
ICSPath => /opt/ics,
MerchantId => v0123456789, # CyberSource supplies this number to you
Mode => test,
Currency => USD,
Grammar => UpperCamel, # defaults to raw ICS responses, so you might want to set this
#ErrorsTo => all-errors@some.fun.place.com,
CriticalErrorsTo => only-critical-errors@some.fun.place.com,
);
my $request = {
OrderId => order19857219,
FirstName => Fred,
LastName => Smith,
Email => fred.smith@buyer-of-stuff.com,
CardNumber => 4111111111111111,
CardCVV => 123,
CardExpYear => 2008,
CardExpMonth => 12,
BillingAddress => 123 Main St,
BillingCity => Olympia,
BillingRegion => WA,
BillingPostalCode => 98501,
BillingCountryCode => US,
ShippingAddress1 => 6789 Industrial Pl,
ShippingAddress2 => Floor 83, Room 11415,
ShippingCity => Olympia,
ShippingRegion => WA,
ShippingPostalCode => 98506,
ShippingCountryCode => US,
ShippingFee => 25.05,
HandlingFee => 5.00,
Items => [
{ Description => Mega Lizard Monster RC,
Price => 25.00,
SKU => prod15185 },
{ Description => Super Racer Parts Kit,
Price => 15.30,
SKU => prod23523 },
{ Description => Uber Space Jacket,
Price => 72.24,
SKU => prod18718 },
],
};
my $response = $ics->requestBill($request);
if ($response->{success}) {
print "Woo! Success!n";
$response = $response->{response};
print "Thanks for your payment of $$response->{BillAmount}.n";
}
else {
print "Boo! Failure!n";
print "Error: $response->{error}->{description}n";
}
Download (0.010MB)
Added: 2007-03-21 License: Perl Artistic License Price:
949 downloads
Tie::Layers 0.06
Tie::Layers is a Perl module to read and write files pipelined through a stack of subroutine layers. more>>
SYNOPSIS
#####
# Subroutines
#
use Tie::Layers qw(is_handle config);
$yes = is_handle( $file_handle );
($key, $old_value) = config(%options, $key);
($key, $old_value) = config(%options, $key => $new_value );
####
# Config default startup options
#
@old_options_list = config(%options, @option_list);
@old_options_list = config(%options, @option_list);
@old_options_list = config(%options, %option_list);
#####
# Class interface
#
require Tie::Layers;
#####
# Using support methods and file handle with
# the file subroutines such as open(), readline()
# print(), close()
#
tie *LAYERS_FILEHANDLE, Tie::Layers, @options
$layers = tied *LAYERS_FILEHANDLE;
#####
# Using support methods only, no file subroutines
#
$layers = Tie::Layers->TIEHANDLE(@options);
($key, $old_value) = $layers->config($key);
($key, $old_value) = $layers->config($key => $new_value );
@old_options_list = $layers->config(@option_list);
@old_options_list = $layers->config(@option_list);
@old_options_list = $layers->config(%option_list);
$data = $layers->fin($filename, @options);
$data = $layers->fout($filename, $data, @options);
$yes = $layers->is_handle( $file_handle );
If a subroutine or method will process a list of options, @options, that subroutine will also process an array reference, @options, [@options], or hash reference, %options, {@options}.
The Tie::Layers program module contains the tie file handle Tie::Layers package. The Tie::Layers package provides the ability to insert a stack of subroutines between file subroutines print and realine and the underlying $file. The syntax of the subroutines of each layer of the readline stack and the print stack must comply to the the requirements described herein below.
This is necessary so that the Tie::Layers READLINE and PRINT subroutines know how to transfer the output from one layer to the input of another layer. The stacks are setup by supplying options with a reference to the subroutine for each layer in the print stack and the readline stack. The Tie::Layers are line orientated and do not support any character file subrouintes.
The getc, read, and write file subroutines are supported by the Tie::Layers package. The seek routines are line oriented in that the seek and tell subroutine positions are the line in the underlying file and not the character position in the file.
Download (0.070MB)
Added: 2007-02-13 License: Perl Artistic License Price:
983 downloads
TinyMake 0.06
TinyMake is a minimalist build language, similar in purpose to make and ant. more>>
TinyMake is a minimalist build language, similar in purpose to make and ant.
SYNOPSIS
use TinyMake :all;
# a file statement without a rule is like a symbolic target
file all => ["codeGen", "compile", "dataLoad", "test"];
file codeGen => ["database.spec"], sub {
# generate code here
sh "touch $target";
} ;
file compile => ["codeGen"], sub {
# compile code here
sh "touch $target";
} ;
file dataLoad => ["codeGen"], sub {
# load data here
sh "touch $target"
} ;
file test => ["compile", "dataLoad"], sub {
# test code here
sh "touch $target";
} ;
# a file statement without prerequisites will be executed
# if the target doesnt exist.
file clean => sub {
# perform cleanup here
sh "rm compile codeGen dataLoad test"
} ;
make @ARGV
This Perl Module allows you to define file-based dependencies similar to how make works.Rather than placing the build rules in a separate Makefile or build.xml, the build rules are declared using standard Perl syntax. TinyMake is effectively an inline domain-specific language. Using make you might write a makefile that looks like this...
test: compile dataLoad
# test
touch test
codeGen: database.spec
# generate code
touch codeGen
compile: codeGen
# compile code
touch compile
dataLoad: codeGen
# load data
touch dataLoad
database.spec: # source file
The equivalent perl code using TinyMake would look like this...
use TinyMake :all;
# some perl code
.
.
.
file test => ["compile","dataLoad"], sub { # test
`touch test`;
} ;
file codeGen => "database.spec", sub { # generate code
`touch codeGen`;
} ;
# some more perl code
.
.
.
file compile => "codeGen", sub { # compile code
`touch compile`;
} ;
file dataload => "codeGen", sub { # load data
`touch dataLoad`;
} ;
make @ARGV;
<<lessSYNOPSIS
use TinyMake :all;
# a file statement without a rule is like a symbolic target
file all => ["codeGen", "compile", "dataLoad", "test"];
file codeGen => ["database.spec"], sub {
# generate code here
sh "touch $target";
} ;
file compile => ["codeGen"], sub {
# compile code here
sh "touch $target";
} ;
file dataLoad => ["codeGen"], sub {
# load data here
sh "touch $target"
} ;
file test => ["compile", "dataLoad"], sub {
# test code here
sh "touch $target";
} ;
# a file statement without prerequisites will be executed
# if the target doesnt exist.
file clean => sub {
# perform cleanup here
sh "rm compile codeGen dataLoad test"
} ;
make @ARGV
This Perl Module allows you to define file-based dependencies similar to how make works.Rather than placing the build rules in a separate Makefile or build.xml, the build rules are declared using standard Perl syntax. TinyMake is effectively an inline domain-specific language. Using make you might write a makefile that looks like this...
test: compile dataLoad
# test
touch test
codeGen: database.spec
# generate code
touch codeGen
compile: codeGen
# compile code
touch compile
dataLoad: codeGen
# load data
touch dataLoad
database.spec: # source file
The equivalent perl code using TinyMake would look like this...
use TinyMake :all;
# some perl code
.
.
.
file test => ["compile","dataLoad"], sub { # test
`touch test`;
} ;
file codeGen => "database.spec", sub { # generate code
`touch codeGen`;
} ;
# some more perl code
.
.
.
file compile => "codeGen", sub { # compile code
`touch compile`;
} ;
file dataload => "codeGen", sub { # load data
`touch dataLoad`;
} ;
make @ARGV;
Download (0.010MB)
Added: 2007-06-06 License: Perl Artistic License Price:
873 downloads
C 0.06
C is pronounced large-C and is a pseudo-interpreter of the C programming language. more>>
C is pronounced large-C and is a pseudo-interpreter of the C programming language.
Without the need of manual compilation, developers can rapidly create cross-platform scripts or write one-liners using the C/C++ programming language that run at native code speed.
Enhancements:
- The -S option was added to show disassembly.
<<lessWithout the need of manual compilation, developers can rapidly create cross-platform scripts or write one-liners using the C/C++ programming language that run at native code speed.
Enhancements:
- The -S option was added to show disassembly.
Download (0.010MB)
Added: 2006-05-19 License: GPL (GNU General Public License) Price:
1264 downloads
wApua 0.06
wApua is a WAP WML browser written in Perl with a Tk user interface. more>>
wApua is a WAP WML browser written in Perl with a Tk user interface. It uses libwww-perl as its backend, has history and cache, and can display most WML tags, including tables and WBMP images.
wApua includes a WBMP to XBM converter for command line use.
Main features:
- Interprets most WML tags, including:
- Anchor- and do-links;
- Templates; (And in comparison to WinWAP 2.x, it interpretes the tag correctly!)
- Tables;
- CDATA sections;
- Images;
- Proxy support via environment variables;
- Image support (WBMP type 0) due to internal WBMP to XBM converter;
- Timer support;
- Emacs-, vi- and Netscape-style (both X- and Windows-Netscapes) key bindings;
- Stop button and right-click context menu; NEW
- Status line showing file size (if appropriate, also image dimension or number of cards), how much data has been downloaded, link URLs, button functions (incl. URLs in case of forward and back buttons and WML do-buttons).
- Highlighting of links, if the mouse is over them (as the hover feature in MSIE and Opera);
- Includes a WBMP to XBM converter script for command line use;
- This converter is thought as an example for how to use the wApua WBMP to XBM converter in other PERL scripts. If youre looking for some professional and free image converter, which can read and write WBMPs, have a look at ImageMagick. (FAQ: Why doesnt my ImageMagick support WBMP?)
- Simple WTAI (Wireless Telephony Application Interface) and Telephone Call URL (RFC 2806) support; NEW
- Surely I havent programmed some telephone, but wApua shows you, what a mobile phone would do with some wtai: or tel: URL.
- RAM cache;
- Simple per-request authentication;
- Comfortable installation via ExtUtils::MakeMaker;
- Configuration via configuration file ~/.wApua.rc; NEW
<<lesswApua includes a WBMP to XBM converter for command line use.
Main features:
- Interprets most WML tags, including:
- Anchor- and do-links;
- Templates; (And in comparison to WinWAP 2.x, it interpretes the tag correctly!)
- Tables;
- CDATA sections;
- Images;
- Proxy support via environment variables;
- Image support (WBMP type 0) due to internal WBMP to XBM converter;
- Timer support;
- Emacs-, vi- and Netscape-style (both X- and Windows-Netscapes) key bindings;
- Stop button and right-click context menu; NEW
- Status line showing file size (if appropriate, also image dimension or number of cards), how much data has been downloaded, link URLs, button functions (incl. URLs in case of forward and back buttons and WML do-buttons).
- Highlighting of links, if the mouse is over them (as the hover feature in MSIE and Opera);
- Includes a WBMP to XBM converter script for command line use;
- This converter is thought as an example for how to use the wApua WBMP to XBM converter in other PERL scripts. If youre looking for some professional and free image converter, which can read and write WBMPs, have a look at ImageMagick. (FAQ: Why doesnt my ImageMagick support WBMP?)
- Simple WTAI (Wireless Telephony Application Interface) and Telephone Call URL (RFC 2806) support; NEW
- Surely I havent programmed some telephone, but wApua shows you, what a mobile phone would do with some wtai: or tel: URL.
- RAM cache;
- Simple per-request authentication;
- Comfortable installation via ExtUtils::MakeMaker;
- Configuration via configuration file ~/.wApua.rc; NEW
Download (0.035MB)
Added: 2006-09-28 License: GPL (GNU General Public License) Price:
1124 downloads
SWISH::Prog::Doc 0.06
SWISH::Prog::Doc is a document object for passing to Swish-e indexer. more>>
SWISH::Prog::Doc is a document object for passing to Swish-e indexer.
SYNOPSIS
# subclass SWISH::Prog::Doc
# and create _filter() methods
package My::Prog::Doc
use base qw( SWISH::Prog::Doc );
sub url_filter
{
my $doc = shift;
my $url = $doc->url;
$url =~ s/my.foo.com/my.bar.org/;
$doc->url( $url );
}
sub content_filter
{
my $doc = shift;
my $buf = $doc->content;
$buf =~ s/foo/bar/gi;
$doc->content( $buf );
}
1;
SWISH::Prog::Doc is the base class for Doc objects in the SWISH::Prog framework. Doc objects are created and returned by the SWISH::Prog->fetch() method.
You can subclass SWISH::Prog::Doc and add _filter() methods to alter the values of the Doc object before it is returned from fetch().
If you subclass SWISH::Prog, you MUST subclass SWISH::Prog::Doc as well, even if only as a placeholder.
Example:
package MyApp::Prog;
use base qw( SWISH::Prog );
sub ok
{
my $self = shift;
my $doc = shift;
1; # everything is permitted (but not all things are profitable...)
}
1;
package MyApp::Prog::Doc; # must use same base class name as above
1;
<<lessSYNOPSIS
# subclass SWISH::Prog::Doc
# and create _filter() methods
package My::Prog::Doc
use base qw( SWISH::Prog::Doc );
sub url_filter
{
my $doc = shift;
my $url = $doc->url;
$url =~ s/my.foo.com/my.bar.org/;
$doc->url( $url );
}
sub content_filter
{
my $doc = shift;
my $buf = $doc->content;
$buf =~ s/foo/bar/gi;
$doc->content( $buf );
}
1;
SWISH::Prog::Doc is the base class for Doc objects in the SWISH::Prog framework. Doc objects are created and returned by the SWISH::Prog->fetch() method.
You can subclass SWISH::Prog::Doc and add _filter() methods to alter the values of the Doc object before it is returned from fetch().
If you subclass SWISH::Prog, you MUST subclass SWISH::Prog::Doc as well, even if only as a placeholder.
Example:
package MyApp::Prog;
use base qw( SWISH::Prog );
sub ok
{
my $self = shift;
my $doc = shift;
1; # everything is permitted (but not all things are profitable...)
}
1;
package MyApp::Prog::Doc; # must use same base class name as above
1;
Download (0.027MB)
Added: 2007-03-09 License: Perl Artistic License Price:
959 downloads
Tie::Gzip 0.06
Tie::Gzip is a Perl module that can read and write gzip compressed files. more>>
Tie::Gzip is a Perl module that can read and write gzip compressed files.
SYNOPSIS
require Tie::Gzip;
tie filehandle, Tie::Gzip
tie filehandle, Tie::Gzip, mode, filename
tie filehandle, Tie::Gzip, filename
tie filehandle, Tie::Gzip, %options
tie filehandle, Tie::Gzip, mode, filename, %options
tie filehandle, Tie::Gzip, filename, %options
tie filehandle, Tie::Gzip, @options
tie filehandle, Tie::Gzip, mode, filename, @options
tie filehandle, Tie::Gzip, filename, @options
The Tie::Gzip module provides a file handle Tie for compressing and uncompressing files using the gzip compression format.
By tieing a filehandle to Tie::Gzip subsequent uses of the file subroutines with the tied filehandle will compress data written to an opened file using gzip compression and decompress data read from an opened file using gzip compression.
If the Tie::Gzip tie receives a filename or mode filename after completing the tie, Tie::Gzip will open filename.
During the tie, Tie::Gzip will first try to load the Compress::Zlib module and package. If successful, Tie::Gzip uses the Compress::Zlib for compressing and decompressing the file data.
<<lessSYNOPSIS
require Tie::Gzip;
tie filehandle, Tie::Gzip
tie filehandle, Tie::Gzip, mode, filename
tie filehandle, Tie::Gzip, filename
tie filehandle, Tie::Gzip, %options
tie filehandle, Tie::Gzip, mode, filename, %options
tie filehandle, Tie::Gzip, filename, %options
tie filehandle, Tie::Gzip, @options
tie filehandle, Tie::Gzip, mode, filename, @options
tie filehandle, Tie::Gzip, filename, @options
The Tie::Gzip module provides a file handle Tie for compressing and uncompressing files using the gzip compression format.
By tieing a filehandle to Tie::Gzip subsequent uses of the file subroutines with the tied filehandle will compress data written to an opened file using gzip compression and decompress data read from an opened file using gzip compression.
If the Tie::Gzip tie receives a filename or mode filename after completing the tie, Tie::Gzip will open filename.
During the tie, Tie::Gzip will first try to load the Compress::Zlib module and package. If successful, Tie::Gzip uses the Compress::Zlib for compressing and decompressing the file data.
Download (0.070MB)
Added: 2007-01-11 License: Perl Artistic License Price:
1017 downloads
QMBTagger 0.06
QMBTagger is a Qt-based frontend to the MusicBrainz client library. more>>
QMBTagger is a Qt-based frontend to the MusicBrainz client library, allowing lookup and tagging of MP3, Ogg, and FLAC files by acoustic IDs. It also allows lookup of CDs based on their tables of contents.
Enhancements:
- FIXED: Bug 945936. Added in the necessary preprocessor directives to keep ogg,mp3,flac support from building if it was not detected by the configure script.
- ADDED: Feature Request 946019. Added support for removing songs from the song list.
- CHANGED: Switched to a QListBox for the list of files since we only need one column.
- ADDED: Feature Request 946017. Added support for keeping track of the directory and a command line option -d directory/path, which sets the directory to start in.
- FIXED: Bug 946401. Check if QMBFile.GetSelectedChild() returns NULL.
- FIXED: Make last directory saving/loading work with loading files too.
- FIXED: Clicking Open Directory and then hitting Cancel no longer tries to open the directory.
- FIXED: No longer does weird things when you query and a song was already selected. Also immediately displays results if a song was already selected.
- FIXED: Bug 969872. Was segfaulting because trm_t object was being reused. Now creates new trm_t object for each song.
- FIXED: Duration is padded correctly now (so it shows up as, e.g., 00:06:04 instead of 0:6:4).
- FIXED: trm_t no longer needs to be deleted in QMBFileView destructor because it is done in the query loop.
- FIXED: Can now use Qt 3.1.2.
- CHANGED: Version number bumped for release.
- FIXED: Aborted on error during CD lookup because of improper string use.
<<lessEnhancements:
- FIXED: Bug 945936. Added in the necessary preprocessor directives to keep ogg,mp3,flac support from building if it was not detected by the configure script.
- ADDED: Feature Request 946019. Added support for removing songs from the song list.
- CHANGED: Switched to a QListBox for the list of files since we only need one column.
- ADDED: Feature Request 946017. Added support for keeping track of the directory and a command line option -d directory/path, which sets the directory to start in.
- FIXED: Bug 946401. Check if QMBFile.GetSelectedChild() returns NULL.
- FIXED: Make last directory saving/loading work with loading files too.
- FIXED: Clicking Open Directory and then hitting Cancel no longer tries to open the directory.
- FIXED: No longer does weird things when you query and a song was already selected. Also immediately displays results if a song was already selected.
- FIXED: Bug 969872. Was segfaulting because trm_t object was being reused. Now creates new trm_t object for each song.
- FIXED: Duration is padded correctly now (so it shows up as, e.g., 00:06:04 instead of 0:6:4).
- FIXED: trm_t no longer needs to be deleted in QMBFileView destructor because it is done in the query loop.
- FIXED: Can now use Qt 3.1.2.
- CHANGED: Version number bumped for release.
- FIXED: Aborted on error during CD lookup because of improper string use.
Download (0.095MB)
Added: 2005-06-15 License: GPL (GNU General Public License) Price:
1593 downloads
Secleted [ 0 ] software to compare
Copyright Notice:
Software piracy is theft, Using crack, password, serial numbers, registration codes, key generators is illegal and prevent future software development. The above snipper 0.06 search only lists software in full, demo and trial versions for free download. Download links are directly from our mirror sites or publisher sites, torrent files or links from rapidshare.com, yousendit.com or megaupload.com are not allowed