.:: Unix and Linux Hacking and Security ::.
1. Unix - Vulnerabilities and Advisories
-- Tutorials and Papers
-- Specific Exploits and Vulnerabilities

2. Unix - Security Tools
-- Unix Security and Audit Tools (Including IDS and Access Control
Tools)
-- Unix Log Analysis Tools
-- Unix Proxies, Firewalls and Accessories
-- Unix Miscellany

3. Unix - BSD, FreeBSD, etc...
-- FreeBSD
-- BSD and Misc. BSD variants
-- BSD Security Tools
-- BSD Micro-distributions

"Peter J. Holzer" wrote in
news:slrnfl3khq.k4i.hjp-usenet2@zeno.hjp.at:

This is an excerpt from the latest version perlfaq4.pod, which
comes with the standard Perl distribution. These postings aim to
reduce the number of repeated questions as well as allow the community
to review and update the answers. The latest version of the complete
perlfaq is at http://faq.perl.org .

--------------------------------------------------------------------

4.18: Does Perl have a Year 2000 problem? Is Perl Y2K compliant?

Short answer: No, Perl does not have a Year 2000 problem. Yes, Perl is
Y2K compliant (whatever that means). The programmers you've hired to use
it, however, probably are not.

Long answer: The question belies a true understanding of the issue. Perl
is just as Y2K compliant as your pencil--no more, and no less. Can you
use your pencil to write a non-Y2K-compliant memo? Of course you can. Is
that the pencil's fault? Of course it isn't.

This is an excerpt from the latest version perlfaq4.pod, which
comes with the standard Perl distribution. These postings aim to
reduce the number of repeated questions as well as allow the community
to review and update the answers. The latest version of the complete
perlfaq is at http://faq.perl.org .

--------------------------------------------------------------------

4.73: How do I print out or copy a recursive data structure?

The "Data::Dumper" module on CPAN (or the 5.005 release of Perl) is
great for printing out data structures. The "Storable" module on CPAN
(or the 5.8 release of Perl), provides a function called "dclone" that
recursively copies its argument.

use Storable qw(dclone);
$r2 = dclone($r1);

Where $r1 can be a reference to any kind of data structure you'd like.
It will be deeply copied. Because "dclone" takes and returns references,
you'd have to add extra punctuation if you had a hash of arrays that you
wanted to copy.

%%newhash = %%{ dclone(\%%oldhash) };

--------------------------------------------------------------------

Hi all,

I have used Perl 5.8.8 for some time now, but I hope you don't mind if
I post my first ever perl 5.10 program and ask for comments: (I just
discovered that ActiveState have now released a Beta for Perl 5.10
under Windows XP)

C:\>perl -v

This is perl, v5.10.0 built for MSWin32-x86-multi-thread
(with 2 registered patches, see perl -V for more detail)

Copyright 1987-2007, Larry Wall

Binary build 1000 [283192] Beta provided by ActiveState http://www.ActiveState.com
Built Nov 22 2007 14:37:48

Here is my program :

use strict;
use warnings;
use feature ':5.10';

property($_) for (0, 1, 2, 3, 4, 'aad', 'abd', 'acd', 'add', 99, 100,
101, 3.1415);

"Petr Vileta" wrote in
news:fipin5$vsd$1@ns.felk.cvut.cz:

You don't see me asking for restaurant recommendations here, do you?

Sinan

On Fri, 30 Nov 2007 19:41:05 -0600, pgmrdan wrote:

Yes, but....

You never test for success here.

$smtp = Net::SMTP->new('xxxxxxxxxx.xxx') or die " message>";

This is an excerpt from the latest version perlfaq4.pod, which
comes with the standard Perl distribution. These postings aim to
reduce the number of repeated questions as well as allow the community
to review and update the answers. The latest version of the complete
perlfaq is at http://faq.perl.org .

--------------------------------------------------------------------

4.21: How do I remove consecutive pairs of characters?

(contributed by brian d foy)

You can use the substitution operator to find pairs of characters (or
runs of characters) and replace them with a single instance. In this
substitution, we find a character in "(.)". The memory parentheses store
the matched character in the back-reference "\1" and we use that to
require that the same thing immediately follow it. We replace that part
of the string with the character in $1.

s/(.)\1/$1/g;