This is really a question for TextEdit, rather than Perl. Presumably the file is in a format that TextWrangler can understand but TextEdit cannot, presumably FASTA. I don't know anything about FASTA format, but I note that there are a number of modules on CPAN in the Bio namespace which might help.