I am having trouble parsing rpm filenames in a shell script.. I found a snippet of perl code that will perform the task but I really don't have time to rewrite the entire script in perl. I cannot for the life of me convert this code into something sed-friendly:
Code:
if ($rpm =~ /([a-zA-Z0-9_\-\+]*)-([a-zA-Z0-9_\.]*)-([a-zA-Z0-9_\.]*)\.(.*)/) {
my $name = $1;
my $version = $2;
my $release = $3;
my $arch = $4;
...your code here...
}
(note this is originally from linux engineer's blog and the author states you could simply add "\" before the parens but this still won't work for me.
What would you do?
Any advice is would greatly appreciated. Thank you in advance.
sun
Last edited by Scott; 10-30-2010 at 06:50 AM..
Reason: Please use code tags
For a programming exercise, I am mean to design a Perl script that detects double letters in a text file.
I tried the following expressions
# Check for any double letter within the alphabet
/+/
# Check for any repetition of an alphanumeric character
/\w+/
Im aware that the... (8 Replies)
Hi,
Can anyone help me to find regular expression for the following in Perl?
"The string can only contain lower case letters (a-z) and no more than one of any letter."
For example: "table" is accepted, whether "dude" is not.
I have coded like this:
$str = "table";
if ($str =~ m/\b()\b/) {... (4 Replies)
Hi,
I get the following when I cat a file *.log
xxxxx
=====
dasdas gwdgsg fdsagfsag agsdfag
=====
random data
=====
My output should look like :
If the random data after the 2nd ==== is null then OK should be printed else
the random data should be printed.
How do I go about this... (5 Replies)
HI,
I'm new to perl and need simple regex for reading a file using my perl script.
The text file reads as -
filename=/pot/uio/current/myremificates.txt
certificates=/pot/uio/current/userdir/conf/user/gamma/settings/security/... (3 Replies)
Hello,
I'm trying to get a quick help on regex since i'm not a regular programmer.
Below is the line i'm trying to apply my regex to..i want to use the regex in a for loop and this line will keep on changing.
subject=... (4 Replies)
Hello folks,
Looking for a quick help on regex in my perl script.
here's the string i want to parse and get the 2nd field out of it.
$str = " 2013-08-07 12:29 Beta ACTIVE";
I want to extract 'Beta' out of this string. This string will keep on changing... (2 Replies)
Could anyone please make me understand how the ?= works below ..
After executing this I am getting the same output.
$string="I love chocolate.";
$string =~ s/chocolate(?= ice)/vanilla/;
print "$string\n"; (2 Replies)
I am not a big expert in regex and have just little understanding of that language.
Could you help me to understand the regular Perl expression:
^(?!if\b|else\b|while\b|)(?:+?\s+){1,6}(+\s*)\(*\) *?(?:^*;?+){0,10}\{
------
This is regex to select functions from a C/C++ source and defined in... (2 Replies)
I'm trying to get some exclusions into our sendmail regular expression for the K command. The following configuration & regex works:
LOCAL_CONFIG
#
Kcheckaddress regex -a@MATCH
+<@+?\.++?\.(us|info|to|br|bid|cn|ru)
LOCAL_RULESETS
SLocal_check_mail
# check address against various regex... (0 Replies)
Experts -
I found a script on one of the servers that I work on and I need help understanding
one of the lines.
I know what the script does, but I'm having a hard time understanding the grouping.
Can someone help me with this?
Here's the script...
#!/usr/bin/perl
use strict;
use... (2 Replies)
Discussion started by: timj123
2 Replies
LEARN ABOUT DEBIAN
chronicle-entry-filter
CHRONICLE-ENTRY-FILTER(1) User Contributed Perl Documentation CHRONICLE-ENTRY-FILTER(1)NAME
chronicle-entry-filter - Convert blog files to HTML, if required.
SYNOPSIS
Help Options
--help Show a brief help overview.
--version Show the version of this script.
Options
--format The global format of all entries.
--filename The name of the single file to process.
Filters
--pre-filter A filter to run before convertion to HTML.
--post-filter A filter to run after HTML conversion.
ABOUT
This script is designed to receive a filename and a global formatting type upon the command line. The formatting type specifies how the
blog entry file will be processed:
1. If the format is "textile" the file will be converted from textile
to HTML.
2. If the format is "markdown" the file will be converted from markdown
to HTML. The related format "multimarkdown" is also recognised.
3. If the format is "html" no changes will be made.
Once the conversion has been applied the code will also be scanned for <code> tags to expand via the Text::VimColour module, if it is
installed, which allows the pretty-printing of source code.
To enable the syntax highlighting of code fragments you should format your code samples as follows:
Subject: Some highlighted code.
Date: 25th December 2009
Tags: chronicle, perl, blah
<p>Here is some code which will look pretty ..</p>
<code lang="perl">
#!/usr/bin/perl -w
...
..
</code>
Notice the use of lang="perl", which provides a hint as to the type of syntax highlighting to apply.
Additionally you may make use of the pre-filter and post-filter pseudo-headers which allow you to transform the entry in further creative
fashions.
For example you might wish the blog to be upper-case only for some reason, and this could be achieved via:
Subject: I DONT LIKE LOWER CASE
Tags: meta, random, silly
Date: 25th December 2009
Pre-Filter: perl -pi -e "s/__USER__/`whoami`/g"
Post-filter: tr [a-z] [A-Z]
<p>This post, written by __USER__ will have no lower-case values.</p>
<p>Notice how my username was inserted too?</p>
You may chain arbitrarily complex filters together via the filters. Each filter should read the entry on STDIN and return the updated
content to STDOUT.
(If you wish to apply a global filter simply pass that as an argument to chronicle, or in your chroniclerc file.)
AUTHOR
Steve
--
http://www.steve.org.uk/
LICENSE
Copyright (c) 2009-2010 by Steve Kemp. All rights reserved.
This module is free software; you can redistribute it and/or modify it under the same terms as Perl itself. The LICENSE file contains the
full text of the license.
perl v5.12.3 2011-05-03 CHRONICLE-ENTRY-FILTER(1)