http://qs321.pair.com?node_id=139487


in reply to about () in the second,third etc data

If I understood your question correctly, then try something like:

my @a = $de->text();
print OUT shift @a, "\n", join("\n", map { "($_)" } @a);

[download]

The shift returns (and removes) the first element, while the map adds those brackets. This is just one possible solution. You also may have a look at printf. Hope this helps.

alex pleiner <alex@zeitform.de>
zeitform Internet Dienste

Replies are listed 'Best First'.
Re: Re: about () in the second,third etc data
by demerphq (Chancellor) on Jan 17, 2002 at 16:31 UTC
    Assuming theres always more than element then the following allows you to lose the map 
    my @a = $de->text();
print OUT shift @a, "\n(", join(")\n(", @a),")\n";

    [download]
    ;-)

    Yves / DeMerphq
    --
    When to use Prototypes?

[reply]
[d/l]

In Section Seekers of Perl Wisdom