Help for this page
#!/usr/bin/perl use strict; ... Phone:719-222-555 Street:1610 Happy AVE APT D Zip: 81006
perl -n -e '$n = 4 if /^id:/; if ($n) { print; $n--; }' your_data_file