my $prev;
while (<>) {
   print($prev) if /^Func_file_permission$/;
   $prev = $_;
}