you need to dereference the arrays that are in the @recs array:
HOORAY!!! This got me past the annoying frosted glass problem. I can now see the two date fields. But what, pray tell, have I done wrong that is prohibiting the text field from showing up. The third line. Below is the actual data I am working with. The FIX you provided allows me to only view the Dates. Thanks again. Jon
01/16/2009
01/14/2009
Document #:R40129:> Projections of FY2009 Federal SCHIP Allotments Under CHIPRA 2009
01/16/2009
01/14/2009
Document #:R40130:> H.R. 2: The Children's Health Insurance Program Reauthorization Act of 2009
01/16/2009
01/13/2009
Document #:R40131:> Administrative Appeals in the Bureau of Land Management (BLM) and the Forest Service
I have a question regarding running perl in the current process.
I shall demonstrate with an example.
Look at this.
sh-2.05b$ pwd
/tmp
sh-2.05b$ cat test.sh
#! /bin/sh
cd /etc
sh-2.05b$ ./test.sh
sh-2.05b$ pwd
/tmp
sh-2.05b$ . ./test.sh
sh-2.05b$ pwd
/etc
sh-2.05b$
So... (10 Replies)
Hi.
I can run the script okay when I log in with root. Then I add this script to crontab and when crontab run i got this message error.
I has installed DBD for Oracle already. I set ORACLE_HOME, ORACLE_BASE to root profile already.
Please help me to fix it. It urgent. Thank so much.
... (2 Replies)
I am trying to use a script to replace the header of each file, whose filename are stored within the array $test, using the sed command within a Perl script as follows:
$count = 0;
while ( $count < $#test )
{
`sed -e 's/BIOGRF 321/BIOGRF 332/g' ${test} > 0`;
`cat 0 >... (2 Replies)
Hi,
Is there any way I can grep an array against another array?
Basically here's what I need to do.
There will be an array containing some fixed texts and I have to check whether some files contain these lines. Reading the same files over and over again for each different pattern doesnt seem... (1 Reply)
Hi Everyone,
#!/usr/bin/perl
use strict;
use warnings;
my @test=("a;b;qqq;c;d","a;b;ggg;c;d","a;b;qqq;c;d");
would like to split the @test array into two array:
@test1=(("a;b;qqq;c;d","a;b;qqq;c;d"); and @test2=("a;b;ggg;c;d");
means search for 3rd filed.
Thanks
find the... (0 Replies)
Hi everyone
I have one question about using array in perl. let say I have several log file in one folder.. example
test1.log
test2.log
test3.log
and the list goes on..
how to make an array for this file? It suppose to detect log file in the current directory and all the log file will... (3 Replies)
I have an array and two variables as below,
I need to check if $datevar is present in $filename.
If so, i need to replace $filename with the values in the array.
I need the output inside an ARRAY
How can this be done.
Any help will be appreciated. Thanks in advance. (2 Replies)
Hi all,
Not sure if this should be in the programming forum, but I believe it will get more response under the Shell Programming and Scripting FORUM.
Am trying to write a customized df script in Perl and need some help with regards to using arrays and file handlers.
At the moment am... (3 Replies)
Linux System having all Perl, Python, PHP (and Ruby) installed
From a Shell script, can call a Perl, Python, PHP (or Ruby ?) file
eg
eg
a Shell script run in a case statement call to run a php file, also Perl or/and Python file???
Like
#!/usr/bin/bash
....
....
case $INPUT_STRING... (1 Reply)
Discussion started by: hoyanet
1 Replies
LEARN ABOUT CENTOS
filter::decrypt
decrypt(3) User Contributed Perl Documentation decrypt(3)NAME
Filter::decrypt - template for a decrypt source filter
SYNOPSIS
use Filter::decrypt ;
DESCRIPTION
This is a sample decrypting source filter.
Although this is a fully functional source filter and it does implement a very simple decrypt algorithm, it is not intended to be used as
it is supplied. Consider it to be a template which you can combine with a proper decryption algorithm to develop your own decryption
filter.
WARNING
It is important to note that a decryption filter can never provide complete security against attack. At some point the parser within Perl
needs to be able to scan the original decrypted source. That means that at some stage fragments of the source will exist in a memory
buffer.
Also, with the introduction of the Perl Compiler backend modules, and the B::Deparse module in particular, using a Source Filter to hide
source code is becoming an increasingly futile exercise.
The best you can hope to achieve by decrypting your Perl source using a source filter is to make it unavailable to the casual user.
Given that proviso, there are a number of things you can do to make life more difficult for the prospective cracker.
1. Strip the Perl binary to remove all symbols.
2. Build the decrypt extension using static linking. If the extension is provided as a dynamic module, there is nothing to stop someone
from linking it at run time with a modified Perl binary.
3. Do not build Perl with "-DDEBUGGING". If you do then your source can be retrieved with the "-Dp" command line option.
The sample filter contains logic to detect the "DEBUGGING" option.
4. Do not build Perl with C debugging support enabled.
5. Do not implement the decryption filter as a sub-process (like the cpp source filter). It is possible to peek into the pipe that
connects to the sub-process.
6. Check that the Perl Compiler isn't being used.
There is code in the BOOT: section of decrypt.xs that shows how to detect the presence of the Compiler. Make sure you include it in
your module.
Assuming you haven't taken any steps to spot when the compiler is in use and you have an encrypted Perl script called "myscript.pl",
you can get access the source code inside it using the perl Compiler backend, like this
perl -MO=Deparse myscript.pl
Note that even if you have included the BOOT: test, it is still possible to use the Deparse module to get the source code for
individual subroutines.
7. Do not use the decrypt filter as-is. The algorithm used in this filter has been purposefully left simple.
If you feel that the source filtering mechanism is not secure enough you could try using the unexec/undump method. See the Perl FAQ for
further details.
AUTHOR
Paul Marquess
DATE
19th December 1995
perl v5.16.3 2013-04-02 decrypt(3)