$dbentry = "BPM-$info.txt"; #add DB prefix open(DBENTRY, ">>$dbentry") || die "cannot open file $dbentry: $!"; #open w/ error handling print DBENTRY "$info\n "; #append Album info close(DBENTRY); #make sure we're all neat