open(FH, ">myPer .txt") or die "Cannot open myPer .txt";
select FH;