Free die hard 4.0 software for linux

Net-SSH2 is a SSH 2 protocol interface.

SYNOPSIS

Top
use Net::SSH2;

my $ssh2 = Net::SSH2->new();

$ssh2->connect(example.com) or die;

if ($ssh2->auth_keyboard(fizban)) {
my $chan = $ssh2->channel();
$chan->exec(program);

my $sftp = $ssh2->sftp();
my $fh = $sftp->open(/etc/passwd) or die;
print $_ while < $fh >;
}

Net::SSH2 is a perl interface to the libssh2 (http://www.libssh2.org) library. It supports the SSH2 protocol (there is no support for SSH1) with all of the key exchanges, ciphers, and compression of libssh2.

Unless otherwise indicated, methods return a true value on success and false on failure; use the error method to get extended error information.

The typical order is to create the SSH2 object, set up the connection methods you want to use, call connect, authenticate with one of the auth methods, then create channels on the connection to perform commands.

Gtk2::Ex::Carp is a GTK+ friendly die() and warn() functions.

SYNOPSIS

use Gtk2::Ex::Carp;

# these override the standard Perl functions:

warn(i told you not to push that button!);

die(an ignominious death);


# new functions for showing extended error information:

# like warn(), but shows a dialog with extra information
# in an expandable text entry:
worry($SHORT_MESSAGE, $EXTENDED_INFORMATION);

# like worry(), but fatal:
wail($SHORT_MESSAGE, $EXTENDED_INFORMATION);

This module exports four functions, of which two override the standard die() and warn() functions, and two which allow for extended error reporting. When called, these functions display a user-friendly message dialog window.

The die() function in this module actually replaces the core die() function, so any modules youve loaded may die will use former instead of the latter. die() will also print the error message to STDERR and will exit the program (with the appropriate exit code) when the dialog is dismissed.

The warn() function will also print a message to STDERR, but will allow the program to continue running when the dialog is dismissed.

EXTRA FUNCTIONS
The worry() and wail() functions behave just like warn() and die(), respectively, except that they allow you to provide additional information. A second argument, which can contain additional error information, is used to fill a text box inside an expander.

HANDLING GLIB EXCEPTIONS
This module also installs warn() as a Glib exception handler. Any unhandled exceptions will be presented to the user in a warning dialog.

PROGRAM FLOW
Note that all the functions in this module create dialogs and use the run() method, so that the standard Glib main loop is blocked until the user responds to the dialog.

Audio:PSID is a Perl module to handle SID files (Commodore-64 music files).

SYNOPSIS

use Audio::SID;

$mySID = new Audio::SID(-filename => Test.sid) or die "Whoops!";

print "Title = " . $mySID->get(title) . "n";

print "MD5 = " . $mySID->getMD5();

$mySID->set(author => LaLa,
title => Test2,
released => 2001 Hungarian Music Crew);

$mySID->validate();
$mySID->write(-filename => Test2.sid) or die "Couldnt write file!";

@array = $mySID->getFieldNames();
print "Fieldnames = " . join( , @array) . "n";

This module is designed to handle SID files (usually bearing a .sid extension), which are music player and data routines converted from the Commodore-64 computer with an additional informational header prepended. For further details about the exact file format, see description of all SID fields in the SID_file_format.txt file included in the module package.

Sepia is a simple Emacs-Perl Interface.

@compls = completions($string [, $type])

Find a list of completions for $string with glob type $type. Completion operates on word subparts separated by [:_], so e.g. "S:m_w" completes to "Sepia::my_walksymtable".

@locs = location(@names)

Return a list of [file, line, name] triples, one for each function name in @names.

@matches = apropos($name [, $is_regex])

Search for function $name, either in all packages or, if $name is qualified, only in one package. If $is_regex is true, the non-package part of $name is a regular expression.

@names = mod_subs($pack)

Find subs in package $pack.

@decls = mod_decls($pack)

Generate a list of declarations for all subroutines in package $pack.

$info = module_info($module, $type)

Emacs-called function to get module information.

$file = mod_file($mod)

Find the likely file owner for module $mod.

@mods = package_list

Gather a list of all distributions on the system. XXX UNUSED

@mods = module_list

Gather a list of all packages (.pm files, really) installed on the system, grouped by distribution. XXX UNUSED

@mods = doc_list

Gather a list of all documented packages (.?pm files, really) installed on the system, grouped by distribution. XXX UNUSED

lexicals($subname)

Return a list of $subnames lexical variables. Note that this includes all nested scopes -- I dont know if or how Perl distinguishes inner blocks.

$lisp = tolisp($perl)

Convert a Perl scalar to some ELisp equivalent.

printer(@res [, $iseval])

Print @res appropriately on the current filehandle. If $iseval is true, use terse format. Otherwise, use human-readable format.

repl(*FH)

Execute a command interpreter on FH. The prompt has a few bells and whistles, including:

* Obviously-incomplete lines are treated as multiline input.

* C< die > is overridden to enter a recursive interpreter at the point
C< die > is called. From within this interpreter, you can examine a
backtrace by calling "bt", return from C< die > with "r EXPR", or
go ahead and die by pressing Control-c.

Behavior is controlled in part through the following package-globals:

$PS1 -- the default prompt

$STOPDIE -- true to enter the inspector on die()

$STOPWARN -- true to enter the inspector on warn()

%REPL -- maps shortcut names to handlers

$PACKAGE -- evaluation package

$WANTARRAY -- evaluation context

$PRINTER -- result printer (default: print_dumper)

Pod::Simple::Wiki is a class for creating Pod to Wiki filters.

SYNOPSIS

To create a simple filter to convert from Pod to a wiki format:

#!/usr/bin/perl -w

use strict;
use Pod::Simple::Wiki;


my $parser = Pod::Simple::Wiki->new(kwiki);

if (defined $ARGV[0]) {
open IN, $ARGV[0] or die "Couldnt open $ARGV[0]: $!n";
} else {
*IN = *STDIN;
}

if (defined $ARGV[1]) {
open OUT, ">$ARGV[1]" or die "Couldnt open $ARGV[1]: $!n";
} else {
*OUT = *STDOUT;
}

$parser->output_fh(*OUT);
$parser->parse_file(*IN);

__END__

To convert Pod to a wiki format using the installed pod2wiki utility:

pod2wiki --style mediawiki file.pod > file.wiki