Beefy Boxes and Bandwidth Generously Provided by pair Networks
more useful options
 
PerlMonks  

Re^3: Compare elements of a line in a file

by frozenwithjoy (Curate)
on Sep 13, 2012 at 08:32 UTC ( #993420=note: print w/ replies, xml ) Need Help??


in reply to Re^2: Compare elements of a line in a file
in thread Compare elements of a line in a file

So, based on the code you posted in response to Dave, you should be able to replace your foreach loop with:

foreach (sort keys %h) { @n = split /\t/, $h{$_}; map {say if $_ > $last+50; $last = $_} @n; }


Comment on Re^3: Compare elements of a line in a file
Download Code
Re^4: Compare elements of a line in a file
by oxydeepu (Novice) on Sep 13, 2012 at 08:35 UTC

    Thank you.

    I will try that snippet.

Re^4: Compare elements of a line in a file
by oxydeepu (Novice) on Sep 13, 2012 at 08:38 UTC

    Thank you.

    I will try that snippet. If you don't mind can you tell me what does it do?

      Unless I've made a typo, the following two snippets should be equivalent:
      my $last = -50; # set to -50 so that the first coordinate will be incl +uded as long as it is 1 or more map {say if $_ > $last + 50; $last = $_} @n;
      my $last = -50; for (@n) { if ($_ > $last + 50) { say $_; } $last = $_; }

        Thanks a ton. I don't Know your name.
        Anyways it worked. Thank you.

        Best Regards
        Deepak

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others drinking their drinks and smoking their pipes about the Monastery: (4)
As of 2014-08-23 20:26 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    The best computer themed movie is:











    Results (178 votes), past polls