C:\test>perl -aF"\|" -nle"print join '|', @F[0,1]" junk6.pl
271479 | Papaya leaf curl Guandong virus
12202 | Lettuce mosaic virus
116056 | Pelargonium zonate spot virus
45709 | Sabia virus