Select Code to Download

sub add {
open FH, ">>$file" or die "Cant open config file $!\n";
...
close FH;
$/ = "\n";
}