03-22-2011
Hi,
Thanks
Klashxx . I just the perl documentation for 5.10.0 and find that \K is the new feature introduced in this version.
Link:
perldelta - perldoc.perl.org
PFB the extract from the same.
\K escape The functionality of Jeff Pinyan's module Regexp::Keep has been added to the core. In regular expressions you can now use the special escape \K as a way to do something like floating length positive lookbehind. It is also useful in substitutions like:
that can now be converted to
which is much more efficient. (Yves Orton)
10 More Discussions You Might Find Interesting
1. Shell Programming and Scripting
i am new to perl. i am writing a perl script. i want to know how to change the working directories? for ex. i have a perl script in c:\proj\ . i want to run this script in this directory but i need my script to change its working directory to D:\xyz\ dynamically in the script.
your help is... (1 Reply)
Discussion started by: megastar
1 Replies
2. Shell Programming and Scripting
Hi,
I'm still new to perl, and I'm trying to figure out how to work with data output from another program. For example, from a command line I can run "foo -xyz" and it will produce the output I am looking for, which is several lines of text that I will then parse and manipulate within the perl... (6 Replies)
Discussion started by: Decoy
6 Replies
3. Shell Programming and Scripting
Good morning all....
I have been learning Perl for about 2 months now and I guess I am getting there as much as I can however I am really stuck. I have a Perl script called postEvent.pl which uses a package called event.pm. PostEvent.pl depends on a meithod inside event.pm called isSuccess to... (0 Replies)
Discussion started by: LRoberts
0 Replies
4. UNIX for Dummies Questions & Answers
Hi Experts!!
I have written a very simple script in perl.The script is :
$ cat 1.pl
#!/usr/bin/perl
print "Hi there!\n";
When i ran the above perl script it is showing the following error:
$ perl 1.pl
-ksh: cd: bad substitution
Can anybody,help on this ....as why this script is... (1 Reply)
Discussion started by: Amey Joshi
1 Replies
5. Shell Programming and Scripting
I am trying to work with a text file which has following format and trying ti run if elseif loop but fails. Any help is appreciated
289B ship N-grp 123
289C ship N-grp 123
289D ship N-grp 123
2CE1 flight N-grp 123
2CE2 flight N-grp 123
2CE3 flight N-grp 123
2CE4 flight N-grp 123
2DAF... (4 Replies)
Discussion started by: dynamax
4 Replies
6. Shell Programming and Scripting
sdcprd@dotstoas110:$ echo $F2
1327332411
this works
----------
sdcprd@dotstoas110:$ perl -MPOSIX -le 'print strftime ("%m%d%y",localtime (1327332411))'
012312 <<<< correct date
this doesnt
-----------
sdcprd@dotstoas110:$ perl -MPOSIX -le 'print strftime ("%m%d%y",localtime... (10 Replies)
Discussion started by: aliyesami
10 Replies
7. Shell Programming and Scripting
Guys,
i was trying a simple if-then-else statement in perl; but not getting any success in that.
can you please help, where i am wrong. I tried $diff variable with double quotes as well, but no go.
$region = $ARGV;
$diff = $ARGV;
if ; then
($date) = split(' ', `ssh -xC $san cat... (2 Replies)
Discussion started by: sdosanjh
2 Replies
8. Shell Programming and Scripting
have issue where my elsif is always failing. Basically i have a file with sets of 2 lines, the 1st line that containing "ipwr" and the 2nd line containing a value or "unknown". if the 2nd line contains a value then i want to print the pair of lines.
open (INFO, "temp.txt") or die;
... (3 Replies)
Discussion started by: johnny921
3 Replies
9. Shell Programming and Scripting
Hello to all,
The Regex below is supposed to match all strings except RR45. I've tested in regex101.com and it works, butwhen I try to use it with the perl command below I get the error shown.
Regex=(?<=^|RR45)(?!RR45).+?(?=RR45|$)
How to fix this? I'm using Cygwin.
$ echo... (9 Replies)
Discussion started by: Ophiuchus
9 Replies
10. Shell Programming and Scripting
Experts - I have a snippet of code I can't figure out. I was hoping someone could help me here.
I have a file of IPv6 address that I need to format correct.
Example in:
2620:0:2d0:200::7
2620:0:2d0:200:a0:c
2620:0a:3f0:200:a0:c
I need to convert them to:... (3 Replies)
Discussion started by: timj123
3 Replies
LEARN ABOUT DEBIAN
string::parity
Parity(3) User Contributed Perl Documentation Parity(3)
NAME
String::Parity, setEvenParity, setOddParity, setSpaceParity, setMarkParity, isEvenParity, isOddParity isSpaceParity, isMarkParity, Even-
Bytes, OddBytes, SpaceBytes, MarkBytes, showParity, showMarkSpace - Parity (odd/even/mark/space) handling functions
SYNOPSIS
use String::Parity;
use String::Parity qw(:DEFAULT /show/);
DESCRIPTION
setEvenParity LIST
Copies the elements of LIST to a new list and converts the new elements to strings of bytes with even parity. In array context
returns the new list. In scalar context joins the elements of the new list into a single string and returns the string.
setOddParity LIST
Like setEvenParity function, but converts to strings with odd parity.
setSpaceParity LIST
Like setEvenParity function, but converts to strings with space (High bit cleared) parity.
setMarkParity LIST
Like setEvenParity function, but converts to strings with mark (High bit set) parity.
EvenBytes LIST
Returns the number of even parity bytes in the elements of LIST.
OddBytes LIST
Returns the number of odd parity bytes in the elements of LIST.
SpaceBytes LIST
Returns the number of space parity bytes in the elements of LIST.
MarkBytes LIST
Returns the number of mark parity bytes in the elements of LIST.
isEvenParity LIST
Returns TRUE if the LIST contains no byte with odd parity, FALSE otherwise.
isOddParity LIST
Returns TRUE if the LIST contains no byte with even parity, FALSE otherwise.
isSpaceParity LIST
Returns TRUE if the LIST contains no byte with mark parity, FALSE otherwise.
isMarkParity LIST
Returns TRUE if the LIST contains no byte with space parity, FALSE otherwise.
showParity LIST
Like setEvenParity function, but converts bytes with even parity to 'e' and other bytes to 'o'. The function showParity must be
imported by a specialised import list.
showMarkSpace LIST
Like setEvenParity function, but converts bytes with space parity to 's' and other bytes to 'm'. The function showMarkSpace must
be imported by a specialised import list.
NOTES
Don't use this module unless you have to communicate with some old device or protocol. Please make your application 8 bit clean and use the
internationally standardised ISO-8859-1 character set.
AUTHOR
Winfried Koenig <win@in.rhein-main.de>
SEE ALSO
perl(1), Exporter(1)
perl v5.8.0 1996-12-10 Parity(3)