BioPerl

Program nr 1:          # operacje na plikach (czytanie zawartosci plikow)  open (DANE1," /home/szyda/PERLFILES/dane2.txt")    or die "Bledna nazwa pliku\n" ;  $tekst = ;  while ($tekst) {    print "$tekst" ;    if ($tekst =~ /Anna/) {      print DANE2 "$tekst&q...

Wyszukiwanie - wyrażenia regularne    Program nr 1:          # operacje na plikach (czytanie zawartosci plikow)  open (DANE3,")  {    $tekst="$_" ;    print "$tekst" ;    # begins with An    if ($tekst =~ /An+/) {print "$tekst" ;}      # contains n 1-3 times    ...

    # last modification: 10.11.2011  # konstrukcja for i przerwanie last if  # wykonuje petle 5 razy  $a=1 ;  for ($a = 1 ; $a  ;    if ($liczba  10)      {print "liczba  10\n" ; }    else      {print "liczba = 10\n" ; }    # przerywa gdy liczba = 1000    last if ($liczba == 1...