Beefy Boxes and Bandwidth Generously Provided by pair Networks
Your skill will accomplish
what the force of many cannot
 
PerlMonks  

capturing names

by Sara (Acolyte)
on Jul 09, 2002 at 13:46 UTC ( #180467=perlquestion: print w/replies, xml ) Need Help??

Sara has asked for the wisdom of the Perl Monks concerning the following question:

hello , I got this data in my file
nbsssbs/cn/bld/cn.bld:cn_commonsw_libs.bld nbsssbs/cn/bld/cn_commonsw_libs.bld:# File: cn_commonsw_libs.bld
I would like to capture the .bld , I want
$hold1 = cn.bld; $hold2 = cn_commonsw_libs.bld;
the problem I am having is , I am trying to avoid the .bld followed by :# in the second line .. , I just need to pare line like the first one
cn.bld:cn_commonsw_libs.bld
thanks for helps and ideas

2002-07-09 Edit by Corion : Added formatting

Replies are listed 'Best First'.
Re: capturing names
by hiseldl (Priest) on Jul 09, 2002 at 15:01 UTC
    It looks like you wanted to comment out the last part of line 2 with #. So you could try removing the comment before you parse the line:
    $line2 =~ s/#.*$//;
    this should give you:
    $hold1 = cn_commonsw_libs.bld; $hold2 = ""; # empty
    --
    .dave.
Re: capturing names
by Rich36 (Chaplain) on Jul 09, 2002 at 14:12 UTC

    Take a look at split - this function allows you to split strings based on whatever character you specify and returns a list of elements derived from the split up string. In this instance, you could detect for the existance of the '#', then split on it and get the first element of the array that split returns - which would be the first part of the line that you want to capture.


    «Rich36»
Re: capturing names
by aseidas (Beadle) on Jul 09, 2002 at 15:14 UTC
    After Dave's regex (and suggestion about the comment) try
    for ($data){ if (m#/([^/]*\.bld)$#) { $count=$count+1; $hold[$count]=$1; print "$hold[$count]\n"; } }
    Aseidas

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: perlquestion [id://180467]
Approved by Corion
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others surveying the Monastery: (2)
As of 2021-03-06 08:49 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    My favorite kind of desktop background is:











    Results (116 votes). Check out past polls.

    Notices?