sorry, i'm new to perl, so if some of the questions are obvious, i apologize.....what's the purpose of this line? map { $_ ,/(\w+)\s+(\w+)\s+(\w+)/} <DATA>