Perl reads the data from the file and outputs the implementation code _PERL

window to read a file in the following format:
Open (Filehand, "path E.g:d:\\data.txt");

The open content is then assigned to a variable:
$protein =<filehand>;

Attached: A program for reading protein sequences.

Copy Code code as follows:

#!/bin/perl
Open (Proteinfile, "F:\\perl\\data.txt") | | Die ("Can not open the file!");
$protein =<proteinfile>;
Close Proteinfile;
Print $protein;

The results are as follows:
f:\>perl\a.pl
Mniddkleglflkcggidemqssrtmvvmggvsgqstvsgelqdsvlqdrsmphqeilaadevlqesemrqqdmishdel
Mvheetvkndeeqmetherlpqglqyalnvpisvkqeitftdvseqlmrdkkqir

F:\>