perl - Extract data using grep and sed

Question

I'm using this code to get all titles from urls with http://something.txt:

#!/usr/bin/perl -w
$output = `cat source.html | grep -o '<a .*href=.*>' | grep -E 'txt' | sed -e 's/<a /\n<a /g' | sed -e 's/<a .*title="//' | cut -f1 -d '"'`;

print("$output");

When i run this on perl i get the error:

sed: -e expression #1, char 6: unterminated `s' command

The error is related with this portion of code:

sed -e 's/<a /\n<a /g'

I don't see any perl in your code. What are you really trying to do? — ghoti
– ghoti, Commented Apr 6, 2015 at 16:53

choroba · Accepted Answer · 2015-04-06 17:15:59Z

2

In backquotes, Perl uses the same rules as in double quotes. Therefore, \n corresponds to a newline; you have to backslash the backslash to pass literal \ to the shell:

`sed -e 's/<a /\\n<a /g'`

answered Apr 6, 2015 at 17:15

choroba

245k27 gold badges221 silver badges304 bronze badges

Sign up to request clarification or add additional context in comments.

Collectives™ on Stack Overflow

perl - Extract data using grep and sed

1 Answer 1

Comments

Your Answer

Hot Network Questions

Collectives™ on Stack Overflow

1 Answer 1

Comments

Your Answer

Sign up or log in

Post as a guest

Related