Why not use a spreadsheet? Import the data as fixed width or specify a space as the delimiter. Are you doing this to learn Perl?

By the way: __DATA__ needs to have 2 underscores in front and back to work in a perl script, it looks like you only have one.