in reply to Compare elements of a line in a file

Here is a start: 
perl -E '@coords = qw(1069 126046 126047 126048); map {say if $_ > $la
+st+50; $last = $_} @coords'

______
1069
126046

[download]

Replies are listed 'Best First'.
Re^2: Compare elements of a line in a file
by oxydeepu (Novice) on Sep 13, 2012 at 08:21 UTC

    Thank you for the reply.

    I have these data inside a file. So how am I supposed to format? This code is direct from command line right?

    Thank you
    Deepak

[reply]
      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;
}

      [download]
[reply]
[d/l]

        Thank you.

        I will try that snippet.

[reply]

        Thank you.

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

[reply]

In Section Seekers of Perl Wisdom