$ tac file | perl -ne'push@a,$_;if(/^Title\b/){print reverse@a;@a=()}'