Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl Monk, Perl Meditation

Re^2: Need help in parsing an input

by sandeepda (Novice)
on Jan 17, 2013 at 12:29 UTC ( #1013767=note: print w/replies, xml ) Need Help??

in reply to Re: Need help in parsing an input
in thread Need help in parsing an input

Thanks Athanasius; I am trying it to make generic I am getting this output as array @outputarray also output is synamic the name and post can change How can i parse this where outputarray[0]=name ip port outputarray[0]=------------------------------------ outputarray[0]=http-listener-1 * 6712
name ip port ------------------------------------ http-listener-1 * 6712 http-listener-2 * 8709

Replies are listed 'Best First'.
Re^3: Need help in parsing an input
by Athanasius (Chancellor) on Jan 17, 2013 at 13:07 UTC

    Hello again sandeepda,

    I’m sorry, but I don’t understand what you are asking.

    The only thought that comes to mind is that you may be unfamiliar with Perl’s special DATA filehandle. But I used that only for convenience. If you already have the data in an array, you would adapt the opening of my script as follows:

    for (@existing_array) {

    On the other hand, if the data is in a file (named, say, “ports.dat”), then you would begin like this:

    my $file = 'ports.dat'; open(my $fh, '<', $file) or die "Cannot open '$file' for reading: $!"; while (<$fh>) {

    If this doesn’t answer your question, please explain what you are asking with your version of the code together with sample input and the output you want. See How do I post a question effectively?

    Hope that helps,

    Athanasius <°(((><contra mundum Iustus alius egestas vitae, eros Piratica,

      Sorry I am beginner in perl just starting hence if there are mistake please oblige. Here is the problem I am executing subroutine in perl script it returns me output dynamically in array format @outputArray
      outputarray[0]=name ip port outputarray[1]=------------------------------------ outputarray[2]=http-listener-1 * 6712 outputarray[3]=http-listener-2 * 4743
      I can also get the output array as like below also if i want
      outputarray[0]=http-listener-1 * 6712 outputarray[1]=http-listener-2 * 4743
      I want to write a subroutine which will check whether port exists and if exists returns me true and the listener name if not it returns me false and null getListenerName($porttobeChecked) This subroutine returns me the name of the listener if i pass a port. Eg: If $porttobechecked=6712 I want to return an array a[0]=TRUE and a1=http-listener-1(listener name) If port to be checked = 4516.I want to return an array a[0]=FALSE and a1=null .Help required

        Hello sandeepda,

        "I want to write a subroutine which will check whether port exists and if exists returns me true..."

        I think your question has really been answered in this thread How to check whether my array contains element x started by you..Please check.
        Except you have something else in mind..

        If you tell me, I'll forget.
        If you show me, I'll remember.
        if you involve me, I'll understand.
        --- Author unknown to me

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://1013767]
and all is quiet...

How do I use this? | Other CB clients
Other Users?
Others contemplating the Monastery: (11)
As of 2018-06-22 16:05 GMT
Find Nodes?
    Voting Booth?
    Should cpanminus be part of the standard Perl release?

    Results (124 votes). Check out past polls.