open (DATA, "source.txt") || die "error opening file";