Hidden Characters in Regular Expression Matching Perl - Perl Newbie
I am completely new to perl programming. My father is helping me learn said programming language. However, I am stuck on one of the assignments he has given me, and I can't find very much help with it via google, either because I have a tiny attention span, or because I can be very very dense.
My problem is this:
I am attempting regular expression matching and replacement on a file that has a hidden character in the word I am trying to replace.
The character is ^A. It is in the word co^Amputer . It shows up multiple times, and all times has ^A in it.
My code is:
Code:
#!/usr/bin/perl
use strict;
my $rules ="/Users/caitlin/scripts/challenge.txt";
open my $FH,'<', $rules or die $!;
while (my $line = <$FH>){
$line =~ "s/computer/WINNER/g";
print $line;
}
According to my father, who is not available right now, I should be able to match and replace with method of matching that I am already familiar with, but it evades me.
And I did searches to try and find ways to match it, but I received answers that did not seem to apply to the issue I am currently experiencing.
Hi all,
I am trying to match a multi line string and return the matching string in one line. Here is the perl code that I wrote:
#!/usr/bin/perl
my $str='<title>My
title</title>';
if ($str =~ /(<title>)(+)(<\/title>)/ ){
print "$2\n";
}
It returns :
My
title
I want the... (3 Replies)
letz say that my file has 7 records with only one field. So my file has:
11111111
000000000000000
1111
aaaabbbccc
1111111222000000
aaaaaaaa
zz
All i need is:
1. when the field has a repetition of the same instance(a-z or 0-9), i would consideer it to be invalid.... (1 Reply)
I am trying to read a file and capture particular lines into different strings:
LENGTH: Some Content here
TEXT: Some Content Here
COMMENT: Some Content Here
I want to be able to get (LENGTH: .... ) into one array and so on... I'm trying to use PERL in slurp mode but for some reason... (8 Replies)
In Perl I can write a condition that evaluates a match expression like this:
if ($foo =~ /^bar/) {
do blah blah blah
}
How do I write this in shell? What I need to know is what operator do I use? The '=~' doesn't seem to fit. I've tried different operators, I browsed the man page for... (3 Replies)
Hi,
I am looking for a Perl regular expression to match the below pattern of a java script file.
var so = object.device.load('camera','value');
I want to grep out such lines present in the *.js files. The conditions are:
a) the line may start with blank space(s)
b) always the... (3 Replies)
Hello,
I am trying to use perl LWP module to read and get a specfic URL page. The issue is that the URL ends with the data and time and time is not consistent it changes all the time. if anyone could help me how to write a regular expressin that would work in the LWP::UserAgent get function to... (0 Replies)
Could you help me with this please. This regular expression seems to match for the wrong input
#!/usr/bin/perl
my $inputtext = "W1a$%XXX";
if($inputtext =~ m/+X+/)
{
print "matches\n";
}
The problem seems to be %. if inputtext is W1a$XXX, the regex doesnot match.... (5 Replies)
Hi all,
How am I read a file, find the match regular expression and overwrite to the same files.
open DESTINATION_FILE, "<tmptravl.dat" or die "tmptravl.dat";
open NEW_DESTINATION_FILE, ">new_tmptravl.dat" or die "new_tmptravl.dat";
while (<DESTINATION_FILE>)
{
# print... (1 Reply)
I had a string in perl script as below.
Tue Augáá7 03:54:12 2012
Now I need to replace the special character with space.
After removing the special chaacters
Tue Aug 7 03:54:12 2012
Could anyone please help me here for writing the regular expression?
Thanks in advance..
Regards,
GS (1 Reply)
Discussion started by: giridhar276
1 Replies
LEARN ABOUT DEBIAN
perl::prereqscanner::scanner::perl5
Perl::PrereqScanner::Scanner::Perl5(3pm) User Contributed Perl Documentation Perl::PrereqScanner::Scanner::Perl5(3pm)NAME
Perl::PrereqScanner::Scanner::Perl5 - scan for core Perl 5 language indicators of required modules
VERSION
version 1.012
DESCRIPTION
This scanner will look for the following indicators:
o plain lines beginning with "use" or "require" in your perl modules and scripts, including minimum perl version
o regular inheritance declared with the "base" and "parent" pragmata
Since Perl does not allow you to supply a version requirement with a "require" statement, the scanner will check the statement after the
"require Module" to see if it is "Module->VERSION( minimum_version );".
In order to provide a minimum version, that method call must meet the following requirements:
o it must be the very next statement after "require Module". Nothing can separate them but whitespace and comments (and one semicolon).
o "Module" must be a bareword, and match the "require" exactly.
o "minimum_version" must be a literal number, v-string, or single-quoted string. Double quotes are not allowed.
AUTHORS
o Jerome Quelin
o Ricardo Signes <rjbs@cpan.org>
COPYRIGHT AND LICENSE
This software is copyright (c) 2009 by Jerome Quelin.
This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself.
perl v5.14.2 2012-06-27 Perl::PrereqScanner::Scanner::Perl5(3pm)
07-26-2011
