#!/usr/bin/perl -w use strict; use warnings; while(<DATA>){ if (/<STANDARD>.*/) { print; } if (/>JN.*/) { print; } } __DATA__ <DIVIDER>file.txt</DIVIDER> <STANDARD>.... .... ... <DIVIDER>file.txt</DIVIDER> >JN....
In reply to Re: Writing on different output files.
by idle
in thread Writing on different output files.
by inspirio
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |