Re: After i made the script of commenting out lines , it starts to make bugs :S <<HELP!>>

[strat]

open HAN,$file || die "error opening file: $!";

This doesn't do what you expect it to do because || binds stronger than , and so you are executing something like open HAN, ( $file || die ... )

Better use one of the following ways (I recommend the first way):

open( HAN, $file ) or die "error opening file: $!";
open( HAN, $file ) || die "error opening file: $!";
open HAN, $file    or die "error opening file: $!";

[firewall00]

Thanks for you Tip