Main > Free Download Search >

Free foo software for linux

foo

Sponsored Links
Sponsored Links
Secleted [ 0 ] software to compare
Results 1 - 15 of about 469
Video::Info::FOO 0.993

Video::Info::FOO 0.993


Video::Info::FOO is a Perl module for video information. more>>
Video::Info::FOO is a Perl module for video information.

Video::Info::FOO - what is it useful for? an example list:

-video codec
-audio codec
-frame height
-frame width
-frame count
and more!

SYNOPSIS

use Video::Info::FOO;

my $video;

$video->vcodec; #video codec
$video->acodec; #audio codec
...

What does the module do? What are its limitations? Is it built on top of other code? If so, what are the details and where can I get it?

<<less
Download (0.62MB)
Added: 2006-07-21 License: Perl Artistic License Price:
1199 downloads
Scalar::Footnote 0.99_02

Scalar::Footnote 0.99_02


Scalar::Footnote is a Perl module that can attach hidden scalars to references. more>>
Scalar::Footnote is a Perl module that can attach hidden scalars to references.

SYNOPSIS

use Data::Dumper;
use Scalar::Footnote;

my $obj = Foo->new;

# attach invisible footnote to $obj:
$obj->Scalar::Footnote::set( my_key => my footnote );
print Dumper( $obj );

# get it back:
my $note = $obj->Scalar::Footnote::get( my_key );
print "footnote: $noten";

# remove it:
my $note = $obj->Scalar::Footnote::remove( my_key );

Scalar::Footnote lets you attach scalar footnotes to an object (or any kind of reference, really) that are essentially invisible from Perl. For example, if you try dumping an object that has a footnote attached to it, you wont actually see the footnote:

my $obj = bless [qw( foo bar )], Foo;
$obj->Scalar::Footnote::set( Foo => foo note );
print Dumper( $obj );
prints:
$VAR1 = bless [
foo,
bar
], Foo;

You can of course still access the footnote with Scalar::Footnote::get.

<<less
Download (0.009MB)
Added: 2007-05-21 License: Perl Artistic License Price:
889 downloads
rconftool 0.1

rconftool 0.1


rconftool is an implementation of sysconftool in Ruby. more>>
rconftool is a reimplementation of Sam Varshavchiks sysconftool in Ruby. Its purpose is to keep configuration files "fresh" when upgrading an application from one version to another, ensuring that all necessary settings are present and obsolete ones removed.

To use it, application writers need to distribute their config files marked up with some simple metadata in comments, and arrange for the make install or make install-configure target to invoke rconftool.

rconftool can be called as a library function or from the command line. It can also install groups of files recursively from one directory tree into another.

rconftool is distributed under the MIT licence.

Installation

You can just use rconftool.rb from the current directory, or copy it anywhere into Rubys library search path. The following command will do this for you:

# ruby install.rb

Usage

(1) As a command-line tool

# ./rconftool.rb foo.dist

Installs foo.dist to foo (option --strip-suffix .dist is the default)

# ./rconftool.rb --strip-suffix .orig --add-suffix .txt *.orig

Installs files foo.orig and bar.orig as foo.txt and bar.txt

# ./rconftool.rb --recursive --targetdir /etc/foo .

Installs all files in the current directory and its subdirectories into /etc/foo recursively. (Suffix .dist is still stripped off by default, unless you specify --strip-suffix ""). /etc/foo itself must exist, but subdirectories are created if necessary.

(2) As a library

require rconftool

# install single files
Rconftool::install(foo.dist, foo)
Rconftool::install(foo.dist, nil, nil, :strip_regexp=>/.dist$/)
Rconftool::install(foo.orig, foo.txt)
Rconftool::install(bar.orig, nil, nil, :strip_regexp=>/.orig$/,
:add_suffix=>.txt)

# using the command-line interface
argv = [--recursive,--targetdir,/etc/foo,.]
rct = Rconftool::Processor.new(argv)
rct.run(argv)
<<less
Download (0.009MB)
Added: 2005-04-12 License: MIT/X Consortium License Price:
1655 downloads
DBIx::OO 0.0.4

DBIx::OO 0.0.4


DBIx::OO is a database to Perl objects abstraction. more>>
DBIx::OO is a database to Perl objects abstraction.

SYNOPSIS

package MyDB;
use base DBIx::OO;

# We need to overwrite get_dbh since its an abstract function.
# The way you connect to the DB is really your job; this function
# should return the database handle. The default get_dbh() croaks.

my $dbh;
sub get_dbh {
$dbh = DBI->connect_cached(dbi:mysql:test, user, passwd)
if !defined $dbh;
return $dbh;
}

package MyDB::Users;
use base MyDB;

__PACKAGE__->table(Users);
__PACKAGE__->columns(P => [ id ],
E => [qw/ first_name last_name email /]);
__PACKAGE__->has_many(pages => MyDB::Pages, user);

package MyDB::Pages;
use base MyDB;

__PACKAGE__->table(Pages);
__PACKAGE__->columns(P => [ id ],
E => [qw/ title content user /]);
__PACKAGE__->has_a(user => MyDB::Users);

package main;

my $u = MyDB::Users->create({ id => userid,
first_name => Q,
last_name => W });

my $foo = MyDB::Users->retrieve(userid);
my @p = @{ $foo->fk_pages };
print "User: ", $foo->first_name, " ", $foo->last_name, " pages:n";
foreach (@p) {
print $_->title, "n";
}

$foo->first_name(John);
$foo->last_name(Doe);
# or
$foo->set(first_name => John, last_name => Doe);
$foo->update;

<<less
Download (0.023MB)
Added: 2007-01-13 License: Perl Artistic License Price:
1014 downloads
Config::Sofu 0.3

Config::Sofu 0.3


Config::Sofu is a simple Sofu configuration file parser. more>>
Config::Sofu is a simple Sofu configuration file parser.

SYNOPSIS

use vars qw/%CONFIG/;
use Config::Sofu "config.sofu";
if ($CONFIG{FOOBAR}) {
...
}
if ($CONFIG{Bar}->[7]->{Foo} eq "Foobar") {
...
}
Save the new configuration:
$CONFIG{FOOBAR}="Bar times Foo";
Config::Sofu::save;
or
Config::Sofu::save(%CompletlyNewConfig)

SYNTAX

This class exports the hash %CONFIG by default which contains all the information of the file which is given to the use statement.

<<less
Download (0.002MB)
Added: 2007-04-12 License: Perl Artistic License Price:
925 downloads
Class::HPLOO 0.23

Class::HPLOO 0.23


Class::HPLOO is an easier way to declare classes on Perl, based in the popular class {...} style and ePod. more>>
Class::HPLOO is an easier way to declare classes on Perl, based in the popular class {...} style and ePod.

USAGE

use Class::HPLOO ;

class Foo extends Bar , Baz {

use LWP::Simple qw(get) ; ## import the method get() to this package.

attr ( array foo_list , int age , string name , foo ) ## define attributes.

vars ($GLOBAL_VAR) ; ## same as: use vars qw($GLOBAL_VAR);

my ($local_var) ;

## constructor/initializer:
sub Foo {
$this->{attr} = $_[0] ;
}

## methods with input variables declared:
sub get_pages ($base , @pages , %options) {
my @htmls ;

if ( $options{proxy} ) { ... }

foreach my $pages_i ( @pages ) {
my $url = "$base/$pages_i" ;
my $html = get($url) ;
push(@htmls , $html) ;
$this->cache($url , $html) ;
}

return @htmls ;
}

## methos like a normal Perl sub:
sub cache {
my ( $url , $html ) = @_ ;
$this->{CACHE}{$url} = $html ;
}

sub attributes_example {
$this->set_foo_list(qw(a b c d e f)) ;
my @l = $this->get_foo_list ;

$this->set_age(30) ;
$this->set_name("Joe") ;
$this->set_foo( time() ) ;
print "NAME: ". $this->get_name ."n" ;
print "AGE: ". $this->get_age ."n" ;
print "FOO: ". $this->get_foo ."n" ;
}

}

## Example of use of the class:

package main ;

my $foo = new Foo(123) ;
$foo->get_pages(http://www.perlmonks.com/, [/index.pl,/foo] , {proxy => localhost:8080}) ;

<<less
Download (0.027MB)
Added: 2007-06-09 License: Perl Artistic License Price:
867 downloads
Rose::Object 0.84

Rose::Object 0.84


Rose::Object is a simple object base class. more>>
Rose::Object is a simple object base class.

SYNOPSIS

package MyObject;

use Rose::Object;
our @ISA = qw(Rose::Object);

sub foo { ... }
sub bar { ... }
...

my $o = MyObject->new(foo => abc, bar => 5);
...

Rose::Object is a generic object base class. It provides very little functionality, but a healthy dose of convention.

METHODS

new PARAMS

Constructs a new, empty, hash-based object based on PARAMS, where PARAMS are name/value pairs, and then calls init (see below), passing PARAMS to it unmodified.

init PARAMS

Given a list of name/value pairs in PARAMS, calls the object method of each name, passing the corresponding value as an argument. The methods are called in the order that they appear in PARAMS. For example:

$o->init(foo => 1, bar => 2);

is equivalent to the sequence:

$o->foo(1);
$o->bar(2);

<<less
Download (0.028MB)
Added: 2007-05-21 License: Perl Artistic License Price:
886 downloads
Object::Mediator 0.02

Object::Mediator 0.02


Object::Mediator is a generic object persistence framework. more>>
Object::Mediator is a generic object persistence framework.

SYNOPSIS

package Persistent;

use base qw( Object::Mediator );

__PACKAGE__->mk_attr ( qw(foo bar) );

sub _set_id {
my $self = shift;

my $id = generate_identity();

$self->identity( $id );
}

sub _insert {
my $self = shift;

$db_handle->insert ( $self->id, $self->foo, $self->bar );
}

sub _update {
my $self = shift;

$db_handle->update ( $self );
}

sub _delete {
my $self = shift;

$db_handle->delete ( $self->id );
}

sub _select {
my $self = shift;

my ( $foo, $bar ) = $db_handle->select ( $self->id );

$self->foo ( $foo );
$self->bar ( $bar );
}

Object::Mediator attempts to be simple and fairly minimalistic object mapping framework. Main aims of development were: usage simplicity, end user transparency, database independency and minimization of database interaction with some kind of in-memory object state control system.

<<less
Download (0.006MB)
Added: 2007-05-18 License: Perl Artistic License Price:
890 downloads
WWW::Google::Video 0.3

WWW::Google::Video 0.3


WWW::Google::Video is a fetch the Google Video Information. more>>
WWW::Google::Video is a fetch the Google Video Information.

SYNOPSIS

use WWW::Google::Video;

$foo=new WWW::Google::Video;

$foo->fetch(http://video.google.com/videoplay?docid=1808273720725631796);
# The Google Video Page URL, such as http://video.google.com/videoplay?docid=blahblahblah

print $foo->{url},"n"; # Google Video FLV Original File URL !!
print $foo->{length},"n"; # Video Length Information
print $foo->{name},"n"; # Video Name Information

foreach(@{ $foo->{pic} }){ # By using Reference to an Array
print $_,"n"; # To show the preview pictures.
}

The WWW::Google::Video is a class implementing a interface for fetch the Google Video Information.

To use it, you should create WWW::Google::Video object and use its method fetch(), to fetch the information of Video.

It uses LWP::Simple for making request to Google.

<<less
Download (0.008MB)
Added: 2006-07-20 License: GPL (GNU General Public License) Price:
1196 downloads
Object::InsideOut 3.17

Object::InsideOut 3.17


Object::InsideOut is a comprehensive inside-out object support module. more>>
Object::InsideOut is a comprehensive inside-out object support module.

SYNOPSIS

package My::Class; {
use Object::InsideOut;

# Numeric field
# With combined get+set accessor
my @data
:Field
:Type(numeric)
:Accessor(data);

# Takes INPUT (or input, etc.) as a mandatory parameter to ->new()
my %init_args :InitArgs = (
INPUT => {
Regex => qr/^input$/i,
Mandatory => 1,
Type => numeriC,
},
);

# Handle class-specific args as part of ->new()
sub init :Init
{
my ($self, $args) = @_;

# Put input parameter into data field
$self->set(@data, $args->{INPUT});
}
}

package My::Class::Sub; {
use Object::InsideOut qw(My::Class);

# List field
# With standard get_X and set_X accessors
# Takes INFO as an optional list parameter to ->new()
# Value automatically added to @info array
# Defaults to [ empty ]
my @info
:Field
:Type(list)
:Standard(info)
:Arg(Name => INFO, Default => empty);
}

package Foo; {
use Object::InsideOut;

# Field containing My::Class objects
# With combined accessor
# Plus automatic parameter processing on object creation
my @foo
:Field
:Type(My::Class)
:All(foo);
}

package main;

my $obj = My::Class::Sub->new(Input => 69);
my $info = $obj->get_info(); # [ empty ]
my $data = $obj->data(); # 69
$obj->data(42);
$data = $obj->data(); # 42

$obj = My::Class::Sub->new(INFO => help, INPUT => 86);
$data = $obj->data(); # 86
$info = $obj->get_info(); # [ help ]
$obj->set_info(qw(foo bar baz));
$info = $obj->get_info(); # [ foo, bar, baz ]

my $foo_obj = Foo->new(foo => $obj);
$foo_obj->foo()->data(); # 86

<<less
Download (0.010MB)
Added: 2007-05-18 License: Perl Artistic License Price:
889 downloads
Clone 0.23

Clone 0.23


Clone is a Perl module that can recursively copy Perl datatypes. more>>
Clone is a Perl module that can recursively copy Perl datatypes.

SYNOPSIS

use Clone;

push @Foo::ISA, Clone;

$a = new Foo;
$b = $a->clone();

# or

use Clone qw(clone);

$a = { foo => bar, move => zig };
$b = [ alpha, beta, gamma, vlissides ];
$c = new Foo();

$d = clone($a);
$e = clone($b);
$f = clone($c);

This module provides a clone() method which makes recursive copies of nested hash, array, scalar and reference types, including tied variables and objects.

clone() takes a scalar argument and an optional parameter that can be used to limit the depth of the copy. To duplicate lists, arrays or hashes, pass them in by reference. e.g.

my $copy = clone (@array);

# or

my %copy = %{ clone (%hash) };

For a slower, but more flexible solution see Storables dclone().

<<less
Download (0.010MB)
Added: 2007-05-16 License: Perl Artistic License Price:
899 downloads
Object::AutoAccessor 0.06

Object::AutoAccessor 0.06


Object::AutoAccessor is an accessor class by using AUTOLOAD. more>>
Object::AutoAccessor is an accessor class by using AUTOLOAD.

SYNOPSIS

use Object::AutoAccessor;

my $struct = {
foo => {
bar => {
baz => BUILD OK,
},
},
};

# Now lets easily accomplish it.
my $obj = Object::AutoAccessor->build($struct);

print $obj->foo->bar->baz; # prints BUILD OK

# OK, now reverse it!
$obj->foo->bar->baz(TO HASHREF);
my $hashref = $obj->as_hashref;
print $hashref->{foo}->{bar}->{baz}; # prints TO HASHREF;

# Of course, new() can be used.
$obj = Object::AutoAccessor->new();

# setter methods
$obj->foo(bar);
$obj->set_foo(bar);
$obj->param(foo => bar);

# getter methods
$obj->foo();
$obj->get_foo();
$obj->param(foo);

# $obj->param() is compatible with HTML::Template->param()
my @keywords = $obj->param();
my $val = $obj->param(hash);
$obj->param(key => val);

my $tmpl = HTML::Template->new(..., associate => [$obj], ...);

Object::AutoAccessor is a Accessor class to get/set values by AUTOLOADed method automatically. Moreover, param() is compatible with HTML::Template module, so you can use Object::AutoAccessor object for HTML::Templates associate option.

<<less
Download (0.006MB)
Added: 2007-05-18 License: Perl Artistic License Price:
889 downloads
Symbol 0.02

Symbol 0.02


Symbol is a Perl module created to manipulate Perl symbols and their names. more>>
Symbol is a Perl module created to manipulate Perl symbols and their names.

SYNOPSIS

use Symbol;

$sym = gensym;
open($sym, "filename");
$_ = ;
# etc.

ungensym $sym; # no effect

# replace *FOO{IO} handle but not $FOO, %FOO, etc.
*FOO = geniosym;

print qualify("x"), "n"; # "Test::x"
print qualify("x", "FOO"), "n" # "FOO::x"
print qualify("BAR::x"), "n"; # "BAR::x"
print qualify("BAR::x", "FOO"), "n"; # "BAR::x"
print qualify("STDOUT", "FOO"), "n"; # "main::STDOUT" (global)
print qualify(*x), "n"; # returns *x
print qualify(*x, "FOO"), "n"; # returns *x

use strict refs;
print { qualify_to_ref $fh } "foo!n";
$ref = qualify_to_ref $name, $pkg;

use Symbol qw(delete_package);
delete_package(Foo::Bar);
print "deletedn" unless exists $Foo::{Bar::};

Symbol::gensym creates an anonymous glob and returns a reference to it. Such a glob reference can be used as a file or directory handle.

For backward compatibility with older implementations that didnt support anonymous globs, Symbol::ungensym is also provided. But it doesnt do anything.

Symbol::geniosym creates an anonymous IO handle. This can be assigned into an existing glob without affecting the non-IO portions of the glob.

Symbol::qualify turns unqualified symbol names into qualified variable names (e.g. "myvar" -> "MyPackage::myvar"). If it is given a second parameter, qualify uses it as the default package; otherwise, it uses the package of its caller. Regardless, global variable names (e.g. "STDOUT", "ENV", "SIG") are always qualified with "main::".

Qualification applies only to symbol names (strings). References are left unchanged under the assumption that they are glob references, which are qualified by their nature.

Symbol::qualify_to_ref is just like Symbol::qualify except that it returns a glob ref rather than a symbol name, so you can use the result even if use strict refs is in effect.

Symbol::delete_package wipes out a whole package namespace. Note this routine is not exported by default--you may want to import it explicitly.

<<less
Download (0.015MB)
Added: 2007-05-14 License: Perl Artistic License Price:
894 downloads
XML::DOM::BagOfTricks 0.05

XML::DOM::BagOfTricks 0.05


XML::DOM::BagOfTricks is a convenient XML DOM. more>>
XML::DOM::BagOfTricks is a convenient XML DOM.

SYNOPSIS

use XML::DOM::BagOfTricks;

# get the XML document and root element
my ($doc,$root) = createDocument(Foo);

# or

# get the XML document with xmlns and version attributes specified
my $doc = createDocument({name=>Foo, xmlns=>http://www.other.org/namespace, version=>1.3});

# get a text element like Bar
my $node = createTextElement($doc,Foo,Bar);

# get an element like
my $node = createElement($doc,Foo,isBar=>0, isFoo=>1);

# get a nice element with attributes that contains a text node Bar
my $foo_elem = createElementwithText($DOMDocument,Foo,Bar,isFoo=>1,isBar=>0);

# add attributes to a node
addAttributes($node,foo=>true,bar=>32);

# add text to a node
addText($node,This is some text);

# add more elements to a node
addElements($node,$another_node,$yet_another_node);

# adds two text nodes to a node
addTextElements($node,Foo=>some text,Bar=>some more text);

# creates new XML:DOM::Elements and adds them to $node
addElements($node,{ name=>Foo, xlink=> cid:.. },{ .. });

# extracts the text content of a node (and its subnodes)
my $content = getTextContents($node);

XML::DOM::BagOfTricks provides a bundle, or bag, of functions that make dealing with and creating DOM objects easier.

The goal of this BagOfTricks is to deal with DOM and XML in a more perl friendly manner, using native idioms to fit in with the rest of a perl program.

As of version 0.02 the API has changed to be clearer and more in line with the DOM API in general, now using createFoo instead of getFoo to create new elements, documents, etc.

<<less
Download (0.006MB)
Added: 2006-07-14 License: Perl Artistic License Price:
1197 downloads
whouses 0.15

whouses 0.15


whouses Perl module is an impact analysis in a clearmake build environment. more>>
whouses Perl module is an impact analysis in a clearmake build environment.

SYNOPSIS

Run this script with the -help option for usage details. Here are some additional sample usages with explanations:

whouses foobar.h

Shows all DOs that make use of any file matching /foobar.h/.

whouses -recurse foobar.h

Same as above but follows the chain of derived files recursively.

whouses -exact foobar.h

Shows all DOs that make use of the specified file. The -exact flag suppresses pattern matching and shows only DOs which reference the exact file.

Whouses provides a limited form of "impact analysis" in a clearmake build environment. This is different from traditional impact analysis (see TRUE CODE ANALYSIS COMPARED below for details). In particular, it operates at the granularity of files rather than language elements.

Whouses is best described by example. Imagine you have a VOB /vobs_sw in which you build the incredibly simple application foo from foo.c. You have a Makefile which compiles foo.c to foo.o and then links it to produce foo. And lets further assume youve just done a build using clearmake.

Thus, foo is a derived object (DO) which has a config record (CR) showing how it was made. Whouses analyzes that CR and prints the data in easy-to-read indented textual format. For instance:

% whouses -do foo foo.c
/vobs_sw/src/foo.c =>
/vobs_sw/src/foo.o

The -do foo points to the derived object from which to extract and analyze the CR; it will be implicit in the remaining examples. The output indicates that foo.o uses foo.c, or in other words that foo.c is a contributor to foo.o. If we add the -recurse flag:

% whouses -r foo.c
/vobs_sw/src/foo.c =>
/vobs_sw/src/foo.o
/vobs_sw/src/foo

We see all files to which foo.c contributes, indented according to how many generations removed they are. If we now add -terminals

% whouses -r -t foo.c
/vobs_sw/src/foo.c =>
/vobs_sw/src/foo

Intermediate targets such as foo.o are suppressed so we see only the "final" targets descended from foo.c.

We can also go in the other direction using -backward:

% whouses -b -e foo
/vobs_sw/src/foo<<less
Download (0.021MB)
Added: 2007-06-08 License: Perl Artistic License Price:
868 downloads
Secleted [ 0 ] software to compare
  • Page: 1 of 5
  • 1
  • 2
  • 3
  • 4
  • 5