Új hozzászólás Aktív témák

• #9933 Zola007 veterán

  Új Válasz 2016-06-17 14:27:01 #9933

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  Zola007

  veterán

  PERL 5.24
  ebben a kis programban nem tudom mi a hiba:
  a feladata, hogy beolvassa a fájl tartalmát, majd kiírja fordítva
  #!/usr/bin/perl -w
# Write a program to read a file, and then print its lines in reverse order, the last line first
$readfile = 'alphabet.txt';
open (ALPHABET, $readfile);
@alphabet = <ALPHABET>;
print "This is the English alphabet:\n\n";
print "@alphabet\n\n";

@reversealphabet = reverse @alphabet;
print "The reverse of the alphabet:\n\n";
print @reversealphabet;
close ALPHABET;
exit;

  Ezt kapom futás után, pedig a txt fájlban úgy szerepel mint a fehér részen:
  

Új hozzászólás Aktív témák