$q->textfield (-default=>A,-name=>"title_$cdnum"),$q->textfield (-default=>""-name=>"artist_$cdnum")