User talk:Seung won lee

Welcome to Biolecture.org! We hope you will contribute much and well. You will probably want to read the help pages. Again, welcome and have fun! S 08:25, 12 September 2015 (KST)

Changshin Park Perl programming homework

------------------------------------------------------------------------------------------------------

As the first homework, you are asked to
write a simple program to open and write a FASTA file with the content
below:

>Your_first_seq
ATATATATATATATATAATATATATATATATATAATATATATATATATATAATATATATATATATATA
ATATATATATATATATAATATATATATATATATAATATATATATATATATAATATATATATATATATA
ATATATATATATATATAATATATATATATATATAATATATATATATATATAATATATATATATATATA
ATATATATATATATATAATATATATATATATATAATATATATATATATATAATATATATATATATATA

------------------------------------------------------------------------------------------------------

I made a code simply gets input from user

i am not sure i understood the homework corretly.

This is the code:

#!/usr/bin/perl
use strict;
use warnings;

print ">Input your FASTA file\n";
my $fasta = <STDIN>;

1. chomp $fasta;
   

chomp($fasta = <STDIN>);

print "$fasta \n";

 

and This is  the result:

 

Thank you.