Free human 0.07 software for linux

Number::Bytes::Human is a Perl module that can convert byte count to human readable format.

SYNOPSIS

use Number::Bytes::Human qw(format_bytes);
$size = format_bytes(0); # 0
$size = format_bytes(2*1024); # 2.0K

$size = format_bytes(1_234_890, bs => 1000); # 1.3M
$size = format_bytes(1E9, bs => 1000); # 1.0G

# the OO way
$human = Number::Bytes::Human->new(bs => 1000, si => 1);
$size = $human->format(1E7); # 10MB
$human->set_options(zero => -);
$size = $human->format(0); # -

THIS IS ALPHA SOFTWARE: THE DOCUMENTATION AND THE CODE WILL SUFFER CHANGES SOME DAY (THANKS, GOD!).

This module provides a formatter which turns byte counts to usual readable format, like 2.0K, 3.1G, 100B. It was inspired in the -h option of Unix utilities like du, df and ls for "human-readable" output.

From the FreeBSD man page of df: http://www.freebsd.org/cgi/man.cgi?query=df

"Human-readable" output. Use unit suffixes: Byte, Kilobyte,
Megabyte, Gigabyte, Terabyte and Petabyte in order to reduce the
number of digits to four or fewer using base 2 for sizes.

byte B
kilobyte K = 2**10 B = 1024 B
megabyte M = 2**20 B = 1024 * 1024 B
gigabyte G = 2**30 B = 1024 * 1024 * 1024 B
terabyte T = 2**40 B = 1024 * 1024 * 1024 * 1024 B

petabyte P = 2**50 B = 1024 * 1024 * 1024 * 1024 * 1024 B
exabyte E = 2**60 B = 1024 * 1024 * 1024 * 1024 * 1024 * 1024 B
zettabyte Z = 2**70 B = 1024 * 1024 * 1024 * 1024 * 1024 * 1024 * 1024 B
yottabyte Y = 2**80 B = 1024 * 1024 * 1024 * 1024 * 1024 * 1024 * 1024 * 1024 B

I have found this link to be quite useful:

http://www.t1shopper.com/tools/calculate/

If you feel like a hard-drive manufacturer, you can start counting bytes by powers of 1000 (instead of the generous 1024). Just use bs => 1000.

But if you are a floppy disk manufacturer and want to start counting in units of 1024000 (for your "1.44 MB" disks)? Then use bs => 1_024_000.

If you feel like a purist academic, you can force the use of metric prefixes according to the Dec 1998 standard by the IEC. Never mind the units for base 1000 are (B, kB, MB, GB, TB, PB, EB, ZB, YB) and, even worse, the ones for base 1024 are (B, KiB, MiB, GiB, TiB, PiB, EiB, ZiB, YiB) with the horrible names: bytes, kibibytes, mebibytes, etc. All you have to do is to use si => 1. Aint that beautiful the SI system? Read about it:

http://physics.nist.gov/cuu/Units/binary.html

You can try a pure Perl "ls -lh"-inspired command with the one-liner, er, two-liner:

$ perl -MNumber::Bytes::Human=format_bytes
-e printf "%5s %sn", format_bytes(-s), $_ for @ARGV *

Why to write such a module? Because if people can write such things in C, it can be written much easier in Perl and then reused, refactored, abused. And then, when it is much improved, some brave soul can port it back to C (if only for the warm feeling of painful programming).

scanmem is a debugging utility used to isolate the position of a variable in an executing program.
The project is similar to pokefinders used to cheat at games.
Enhancements:
- Performance improvements and reduced scan time, including miscellaneous improvements to various commands.
- A dejagnu test suite was started and the build process was autotooled.
- One serious bug where misaligned variables could potentially be missed by scanmem was fixed along with multiple minor bugs.

Are You Human? is a script that uses a graphical test to insure that a human is being dealt with rather than a script.

This is useful to avoid automated Web signups or automated attempts to crack passwords.

There are many equivalent libraries for other languages but this is the first one for Python. The Python Imaging Library (PIL) is required.

Jaffer project is a Java implementation of Appletalk File Protocol v3.1 using TCP Transport. Performance on a Gigabit network exceeds both Samba and Netatalk. No, Really. Disable debugging.
Quick start:
This program will act like a native Appletalk file server. You must run it as root to use Appletalks normal port 548. But its just as happy running on any unpriviledged port. To access shadow passwords, the server must be run as root.
Your client must be a Mac OS X 10.2 or newer system.
Download a recent build and source code.
Or browse the source in svn.
Run the server:
java -jar jaffer.jar -config [config-file]
or, alternatively, for quick testing:
java -jar jaffer.jar -server [port] [volume-name] [path-to-export]
From the OS X Client, mount the new volume:
mount_afp afp://[user]:[pass]@[host]:[port]/[volume-name] [mount-point]
The [user]:[pass]@ part of the url is optional. If omitted, the mount will be attempted as a Guest user.
Developers:
Most of your work will most likely be done in the AFP_Session class implementing additional AFP calls. When you do this, please be mindful of comments in the code. They are sparse, but very important. When you add call implementations, please make sure they are represented in the AFP_Constants file and annotated with the page number in the AFP3.1 reference PDF.
Most of the implementation is geared towards AFP3.1 which means that some of the helper and common methods are not usable for AFP2.3 or earlier protocols.
Enhancements:
- added zipfs, refactoring for jdk1.5

WWW::GMail is a Perl extension for accessing Google Mail (gmail).

SYNOPSIS

use WWW::GMail;

my $obj = WWW::GMail->new(
username => "USERNAME",
password => "PASSWORD",
cookies => {
autosave => 1,
file => "./gmail.cookie",
},
);

my $ret = $obj->login();
if ($ret == -1) {
print "password incorrectn";
} elsif ($ret == 0) {
print "unable to login $obj->{error}n";
exit;
}

my @list = $obj->get_message_list(inbox);

# count the new messages in the inbox
my $new_msgs = 0;
for my $i ( 0 .. $#list ) {
$new_msgs += $list[$i]->[1]; # count the unread flags
}

print "you have $new_msgs new messages in your inboxn";

my @contacts = $obj->get_contact_list();
print "you have ".(@contacts)." contactsn";

my $gmail = 0;
for my $i ( 0 .. $#contacts ) {
$gmail += ($contacts[$i]->[3] =~ m/gmail.com$/i);
}

print "$gmail of them are gmail addressesn";

$obj->logout();

XML::QL is an XML query language.

SYNOPSIS

$ql = WHERE $head ORDER-BY $head IN "file:REC-xml-19980210.xml" CONSTRUCT $head;

print XML::QL->query($sql);

This module is an early implementation of a note published by the W3C called "XML-QL: A Query Language for XML". XML-QL allows the user to query an XML document much like a database, and describe a construct for output. Currently this module only offers partial functionality as described in the specification, and even some of that has been changed for ease of use. This documentation will describe the fuctionality of this module as well as differences from the XML-QL specification.

METHODS

query( "query" )

This is the only method required to use this module. This one method allows the user to pass a valid XML-QL query to the module, and the return value is the output.

Text::Macro Perl module is a template facility whos focus is on generating code such as c, java or sql. While generating perl code is also possible, there is a potential conflict between the control-symbol and the perl comment symbol.
Perl is excelent at manipulating text, and it begs the question why one would need such a tool.
The answer is that good code design should be such that applications should not have to be modified so as to make configuration changes. Thus external configuration files/data is used. However, if these files are read in as perl-code, then simple errors could crash the whole application (or provide subtle security risks). Further, it is often desired to invert the control flow and text-data (namely, make the embedded strings primary, and control-flow secondary). This is the ASP model, and for 90% HTML, 10% code, this works great.
This module supports many control facilities which directly translate into perl-control facilities (e.g. inverting the ASP-style code back into perl-style behind the scenes). The inversion process is cached in a simple user object.
The module was initially inspired by Text::FastTemplate by Robert Lehr, whos module didnt completely fullfill my needs.
Main features:
- fast, simple, robust
- code-generating-centric feature-set
- substitutions stand-out from template
- macro-code embedded in text
- OOP
- external and internal includes (for clearifying complex control-flow)
- scoped variable-substitutions
- line-based processing (like cpp)
- usable error messages

PEBL is software for creating psychology experiments.
PEBL offers a simple programming language tailor-made for creating and conducting simple experiments. It is Free software, licensed under the GPL, with both the compiled executables and source code available without charge.
PEBL is programmed primarily in C++, but also uses flex and bison (GNU versions of lex and yacc) to handle parsing.
PEBL is designed to be easily used on multiple computing platforms. Its current implementation uses the SDL as its implementation platform, which is also a cross-platform library that compiles natively under Win32, Linux, and Macintosh Operating Systems. Currently, PEBL works on Windows and Linux.
Enhancements:
- This version includes a number of useful functions, improved documentation, new fonts, and the ability to do simple TCP/IP networking.
- Three supplementary packages are now available: the PEBL Image Archive, the PEBL sound archive, and the PEBL Test Battery.
- The Test battery represents an initial attempt to cover a number of standard tasks used in psychological and neuropsych testing, including versions of the Wisconsin Card Sort, Iowa Gambling task, Test of Variables of Attention, and a number of others.