KÃ©tsÃ©gbeesetten Need Help on this Perl script

#1 (**permalink**) 10-02-2006

ok, Ã©n dont tud olyan perl. valÃ³ban, nagyon-nagyon keveset. nem sok egyÃ¡ltalÃ¡n.

Most a feladat nekem van az, hogy el kell mennem a kÃ¶nyvtÃ¡rba, hogy tele van tÃ¶bb szÃ¡z fÃ¡jlt tartalmaz sok hÃºrjait, amit a szÅ±rÅ‘ segÃtsÃ©gÃ©vel. Ãgy ha Ã©n kap ebbe a kÃ¶nyvtÃ¡rba, i tÃpus:

grep-r * Akamai a kÃ¶nyvtÃ¡rban.

A fenti grep parancs kikÃ¶pi sorozat teljesÃtmÃ©ny hasonlÃ³ a kÃ¶vetkezÅ‘:

/ excite/homepagepoll/ans_jan24_02.oft: <img src \u003d "http://a88.g.akamai.net/f/88/606/1d/image.lovesluudf.com/people/images/global/poll/popuptop. gif "width \u003d" 468 "height \u003d" 62 "border \u003d" 0 ">

az Ãºt bal oldalÃ¡n a vastagbÃ©l a fenti kimenetet jelenti az abszolÃºt elÃ©rÃ©si Ãºtja, ahol a hÃºr Azt akartam, meg nem talÃ¡ljuk.

most, a feladat, meg kell Ãrni Perl script, amely szÅ±rjÃ¼k Ã¡t az eredmÃ©nye a "grep-r Ardo *", majd elÅ‘, hogy csak egy sort tartalmaz, a fÃ¡jl nevÃ©t Ã©s a Akamai string.

jelentÃ©ssel bÃr, az eredmÃ©nyben kell valami ilyesmi:

/ excite/homepagepoll/ans_jan24_02.oft: http://a88.g.akamai.net/f/88/606/1d/...l/popuptop.gif

AlapvetÅ‘en, ami greps ki a fÃ¡jl nevÃ©t Ã©s a csak a kapcsolat (ok), amely tartalmazza, hogy a fÃ¡jl, ami megfelel a "Ardo"

ElnÃ©zÃ©st a hosszÃº olvasni. de Ã©n csak szÃ¼ksÃ©ges tisztÃ¡zni. valaki kÃ©rem, segÃtsen. All I Need csak valamit kezdeni az.

anbu23 · #2 (**permalink**) 10-02-2006

try this

KÃ³d:

grep -r akamai * | sed '/SRC=/s/\([^:]*\).*SRC="\([^"]*\)".*$/\1: \2/'

#3 (**permalink**) 10-03-2006

IdÃ©zet:

Originally Posted by anbu23

try this

KÃ³d:

grep -r akamai * | sed '/SRC=/s/\([^:]*\).*SRC="\([^"]*\)".*$/\1: \2/'

Beteg 'ad ez egy lÃ¶vÃ©s egy kicsit, Ã©s hadd u tud az eredmÃ©nyeket. BÃzom Istenben, ez mÅ±kÃ¶dik

#4 (**permalink**) 10-03-2006

Nem hiszem, hogy nem dolgozik. ez bÃ¡rmi mÃ¡s, amit lehet tenni?

vino · #5 (**permalink**) 10-03-2006

PrÃ³bÃ¡ld ki ezt.

KÃ³d:

grep -r akamai * | sed -n -e "s+^\([^:]*:\).*\(http[^\"].*\)\".*+\1 \2+p"

Nem vizsgÃ¡lt tho.

ghostdog74 · #6 (**permalink**) 10-03-2006

AlternatÃvakÃ©nt Python:

KÃ³d:

s = '/excite/homepagepoll/ans_jan24_02.oft: <IMG SRC="http://a88.g.akamai.net/f/88/606/1d/image.lovesluudf.com/people/images/global/poll/popuptop.gif" WIDTH="468" HEIGHT="62" BORDER="0">'
splitted = s.split(":",1)
homepage,  = splitted[0]
urlpage = splitted[1].split()[1].replace('SRC="',"").replace('"',"")
final = homepage + ":" + urlpage
print final

#7 (**permalink**) 10-04-2006

IdÃ©zet:

Originally Posted by vino

PrÃ³bÃ¡ld ki ezt.

KÃ³d:

grep -r akamai * | sed -n -e "s+^\([^:]*:\).*\(http[^\"].*\)\".*+\1 \2+p"

Nem vizsgÃ¡lt tho.

ez nem mÅ±kÃ¶dik. Nekem is van egy ilyen "Broken Pipe" HibaÃ¼zenetek

TÃ¶bb, UNIX Ã©s Linux fÃ³rum tÃ©mÃ¡k Ã–n Ã¡ltal talÃ¡lt Hasznos
SzÃ¡l	Thread Starter	FÃ³rum	VÃ¡laszok	UtolsÃ³ hozzÃ¡szÃ³lÃ¡s
FelhÃvÃ¡s a perl script a perl script	new2ss	Shell programozÃ¡s Ã©s Scripting	6	05-24-2009 06:03 PM
FelvÃ©tel PERL szkript a Unix shell script	ganapati	A UNIX a dummies KÃ©rdÃ©sek Ã©s vÃ¡laszok	1	04-29-2008 01:18 PM
Itt a dokumentum automatizÃ¡lÃ¡sÃ¡ra Perl script felhÃvÃ¡s script	hogger84	Shell programozÃ¡s Ã©s Scripting	3	10-22-2007 11:15 AM
MÃ³dosÃt Perl script dolgozni txt - Permissions script	joangopan	Shell programozÃ¡s Ã©s Scripting	1	09-13-2007 12:38 AM
Perl: Futtassa perl szkriptet az aktuÃ¡lis folyamat	vino	Shell programozÃ¡s Ã©s Scripting	10	12-09-2005 10:45 AM

TÃ©ma eszkÃ¶zÃ¶k	KeresÃ©s a tÃ©ma
Show NyomtathatÃ³ verziÃ³ KÃ¼ldÃ©s e-mailben	KeresÃ©s a tÃ©ma: RÃ©szletes keresÃ©s
MegjelenÃtÃ©si mÃ³dok	Rate this thread
VÃ¡ltÃ¡s Linear Mode Hibrid Ã¼zemmÃ³d Switch to Threaded Mode	Rate this thread: