As a side note, when I was the lead guy during the once famous "Langley Cyber Attack", where my work in an epic "email reply spam battle" happened over two decades ago, long before spam filters became of age, we wrote all our email anti-spam filters and detection algorithms in PERL.
Edit: For anyone interested in the early days of "cyberwar" in the 1998/1997 timeframe:
That PERL code "way back when" was "very crude" by todays standards, but it was very effective and fast. PERL was the best tool for that job "way back when". I was a huge PERL advocate back then, and would write all scripts in PERL, even when PERL was not needed. I loved PERL so much back then that I tried to get everyone to learn it and use it.
Sometimes old guys like me forget that the younger generations may not have had the chance to develop code in PERL and other "out of favor" programming languages these days. But when I read this discussion it brings back wonderful memories of some of the best "tech days" of my life, defending the US Air Force against hackers with PERL scripts in real-time.
wisecracker, I say "go for it" if you or anyone reading this has the time or interest to learn PERL. I would love to see a lot of people posting PERL problems here. Perhaps that would jog even more great memories from decades ago from the deep trenches of cyber warfare battles when the web was but an infant.
Can anyone tell me if the copy command in PERL has the same functionality as in KSH shell in UNIX or does it actually move the file ??
$cp_stat=system("cp $ENV{OLAMEBSDIR}/data/olam.ddabal$type $ENV{OLAMDIR}/balance/data/olam.ddabal$type.$HeaderDate"); (1 Reply)
Could someone tell me what is wrong with these PERL statements
it is always setting the $status2 to the number inside of the brackets......why????????
if (/^Status:/)
{
$stat = $Fld;
print "\$stat is $stat\n";
}
the above is where i'm searching for a string... (1 Reply)
When i run my perl/tk script, a perl window pops up behind the GUI window,, can this be hidden????
Also, can the Icon be changed, the Tk icon in every window??? (1 Reply)
If I use 2 system commands in a script, will one finish before the next one starts? or will it start the first and the second at the same time?
i.e.
system("ps | grep rminer");
system("ls -al | grep 431"); (1 Reply)
Hi everyone
I am not even a novice at Perl scripting .. but had to edit one the other day. The only way I can get it to run is by prefixing 'perl' before running it - ie # perl scriptname
I am running AIX.
Any ideas why i have to do that ?
Thanks! (2 Replies)
Playing with an until loop as follows:
my $input;
until ($input eq "quit") {
print "Please enter something:";
$input = <STDIN>;
chomp $input;
if ($input eq "dog") {
print "cat" ;
}
else {
print "Please re-enter";
}
}
Something simple like this...
I want to prompt the user to... (3 Replies)
Hi All,
I am new to perl and just want to read the text file and write back it into another file with some modification.
Here is my requirement:
input file:
USB_OTG_PATH top.usb_top.otg_top
USB_HSIC_PATH top.usb_top.hsic_top
.. (All starts with USB_)
...
START_PATH USB_OTG_PATH.interrupt... (2 Replies)
Hi All,
I am new to Perl and got a real stupid question. We are trying to install the Date:Calc package for some calculations with dates.The security guys mentioned they won't install it as root in /usr/bin/perl but have asked us to install it in any directory and use it from there.
Here's the... (2 Replies)
I have reviewed many examples on-line about running another process (either PERL or shell command or a program), but do not find any usefull for my needs way. (Reviewed and not useful the system(), 'back ticks', exec() and open())
I would like to run another PERL-script from first one, not... (1 Reply)
Discussion started by: alex_5161
1 Replies
LEARN ABOUT MOJAVE
inline-support5.18
Inline-Support(3) User Contributed Perl Documentation Inline-Support(3)NAME
Inline-Support - Support Information for Inline.pm and related modules.
DESCRIPTION
This document contains all of the latest support information for "Inline.pm" and the recognized Inline Language Support Modules (ILSMs)
available on CPAN.
SUPPORTED LANGUAGES
The most important language that Inline supports is "C". That is because Perl itself is written in "C". By giving a your Perl scripts
access to "C", you in effect give them access to the entire glorious internals of Perl. (Caveat scriptor :-)
As of this writing, Inline also supports:
- C++
- Java
- Python
- Tcl
- Assembly
- CPR
- And even Inline::Foo! :)
Projects that I would most like to see happen in the year 2001 are:
- Fortran
- Ruby
- Lisp
- Guile
- Bash
- Perl4
SUPPORTED PLATFORMS
"Inline::C" should work anywhere that CPAN extension modules (those that use XS) can be installed, using the typical install format of:
perl Makefile.PL
make
make test
make install
It has been tested on many Unix and Windows variants.
NOTE: "Inline::C" requires Perl 5.005 or higher because "Parse::RecDescent" requires it. (Something to do with the "qr" operator)
Inline has been successfully tested at one time or another on the following platforms:
Linux
Solaris
SunOS
HPUX
AIX
FreeBSD
OpenBSD
BeOS
OS X
WinNT
Win2K
WinME
Win98
Cygwin
The Microsoft tests deserve a little more explanation. I used the following:
Windows NT 4.0 (service pack 6)
Perl 5.005_03 (ActiveState build 522)
MS Visual C++ 6.0
The "nmake" make utility (distributed w/ Visual C++)
"Inline::C" pulls all of its base configuration (including which "make" utility to use) from "Config.pm". Since your MSWin32 version of
Perl probably came from ActiveState (as a binary distribution) the "Config.pm" will indicate that "nmake" is the system's "make" utility.
That is because ActiveState uses Visual C++ to compile Perl.
To install "Inline.pm" (or any other CPAN module) on MSWin32 w/ Visual C++, use these:
perl Makefile.PL
nmake
nmake test
nmake install
Inline has also been made to work with Mingw32/gcc on all Windows platforms. This is a free compiler for Windows. You must also use a perl
built with that compiler.
The "Cygwin" test was done on a Windows 98 machine using the Cygwin Unix/Win32 porting layer software from Cygnus. The "perl" binary on
this machine was also compiled using the Cygwin tool set ("gcc"). This software is freely available from http://sources.redhat.com/cygwin/
If you get Inline to work on a new platform, please send me email email. If it doesn't work, let me know as well and I'll see what can be
done.
SEE ALSO
For general information about Inline see Inline.
For information about using Inline with C see Inline::C.
For sample programs using Inline with C see Inline::C-Cookbook.
For information on writing your own Inline Language Support Module, see Inline-API.
Inline's mailing list is inline@perl.org
To subscribe, send email to inline-subscribe@perl.org
AUTHOR
Brian Ingerson <INGY@cpan.org>
COPYRIGHT
Copyright (c) 2000-2002. Brian Ingerson.
Copyright (c) 2008, 2010, 2011. Sisyphus.
This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
See http://www.perl.com/perl/misc/Artistic.html
perl v5.18.2 2012-11-19 Inline-Support(3)