my $value = "value.txt" ;#final file I want with output as 10/0/false open RESULT, "<$result"; open VALUE, ">$value"; s/line\d+=(.*)// and print "$1/" while (); close VALUE; close RESULT;