in reply to Re: (jeffa) Re: Unique Array Entries
in thread Unique Array Entries

I think that your first snippet would work except for the fact that it does retain that typo: (Topology/Device=2/Port) Is there anyway to disregard that and have the following:

Topology/IPClassA/Device/log_ratio Topology/IPClassA/Device/poll_interval Topology/Device=2/poll_interval Topology/Device=2/is_managed Topology/Device=2/Port/ifPhysAddress Topology/Device=2/Port/poll_interval Topology/IPClassC/Device/poll_interval Location

I am traversing an hlist that I have built, and would like to utilize all of the unique strings elsewhere.

Thanks

2002-02-02 Edit by The Perlmonks Node Pixies : Added formatting

Replies are listed 'Best First'.
Re: Re: Re: (jeffa) Re: Unique Array Entries
by Corion (Patriarch) on Mar 02, 2002 at 16:58 UTC

    I'm not completely sure I understand you. The output of both versions, jeffas and mine, is eight lines, and the line you don't seem to want is not included in either (both versions output eight lines, your sample output had nine lines. As far as I understand you, you want eight lines of output. Both versions should be easily reusable within any script, if you replace the print statements with some other statement collecting the strings into an array.

    perl -MHTTP::Daemon -MHTTP::Response -MLWP::Simple -e ' ; # The $d = new HTTP::Daemon and fork and getprint $d->url and exit;#spider ($c = $d->accept())->get_request(); $c->send_response( new #in the HTTP::Response(200,$_,$_,qq(Just another Perl hacker\n))); ' # web
Re: Re: Re: (jeffa) Re: Unique Array Entries
by The_Rev (Acolyte) on Mar 02, 2002 at 16:56 UTC
    I also forgot to mention that my strings aren't static and they will change according to the input.
Re: Re: Re: (jeffa) Re: Unique Array Entries
by The_Rev (Acolyte) on Mar 02, 2002 at 16:59 UTC
    I also forgot to mention that these strings are going to be created dynamically, and won't always appear as in my example. Thanks