in reply to Perl: Extracting specific text from a .txt file and outputting into a new format
while(<IN>){ my ( $k, $v ) = split /\s*:\s*/, $_, 2; ... } [download]