while (<FF>) {
     next unless /XXXX/;
     print scalar <FF>;
}