#!/usr/bin/perl use strict; while (<DATA>) { print if ( (split)[4] > 50 ); } __DATA__ ENSMUSG00000027831 ENSTBEG00000008938 ortholog_one2one Euther +ia 56.2942008486563 ENSMUSG00000027831 ENSLAFG00000011038 ortholog_one2one Euther +ia 58.5845347313237 ENSMUSG00000027831 ENSDORG00000014560 ortholog_one2one Sciuro +gnathi 43.9759036144578
In reply to Re: Parsing in perl
by bichonfrise74
in thread Parsing in perl
by Nalababu
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |