[Code] PERL: Was macht dieses Script?

Dieses Thema im Forum "Programmierung & Entwicklung" wurde erstellt von jiggolo, 19. Februar 2009 .

Schlagworte:
Status des Themas:
Es sind keine weiteren Antworten möglich.
  1. 19. Februar 2009
    PERL: Was macht dieses Script?

    Hi jungs,

    ich habe ein problem und hoffe, ihr könnt mir helfen..
    Ich habe vorhin ein PERL Script geschickt bekommen und soll einer Freundin von mir helfen.
    Leider kenne ich mich selber mit derlei Dingen nicht so gut aus und hoffe mal, dass ihr mir da helfen könnt.

    Das Script sieht so aus:

    Code:
    # Was macht das script?
# Dazu muss für jede Zeile mindesten zwei Zeilen Kommentar geschrieben werden.
# An der Stelle die "... $!" sind die drei Punkte durch einen passenden Text zu ersetzen.
for ($i = 0; $i < 11; $i++) {
if ( ( $i < 1 ) or ( $i > 8 ) ) {
$odatei = "ABCD".$i;
open( ODATEI, ">$odatei" ) || die "... $!";
$zahl = $i + 7;
print ODATEI "hier steht $zahl\n";
close ( ODATEI );
}
}

    BW ist natürlich drin und ein gut habt ihr auch..

    Erstmal vielen Dank


    PS: War das Präfix korrekt gewählt?
     
  3. 19. Februar 2009
    AW: PERL: Was macht dieses Script?

    Hey!

    Code:
    for ($i = 0; $i < 11; $i++)
{
 if ( ( $i < 1 ) or ( $i > 8 ) )
 {
 $odatei = "ABCD".$i;
 
 open( ODATEI, ">$odatei" ) || die "... $!";
 
 $zahl = $i + 7;
 print ODATEI "hier steht $zahl\n";
 
 close ( ODATEI );
 }
}
    Das Script erstellt die Dateien "ABCD0", "ABCD9", "ABCD10" und schreibt in diese "hier steht 7", "hier steht 16" und "hier steht 17".

    Ziemlich sinnlos...

    Mfg,

    Kolazomai
     
  4. 19. Februar 2009
    AW: PERL: Was macht dieses Script?

    Wird wohl für die Schule sein...

    PHP:
    // Schleife läuft 11 mal durch und zählt $i dabei hoch (jeden durchlauf wird i um 1 erhöht. i=10 ist der letzte schleifendurchlauf da danach die bedingung i<11 nicht mehr gegeben ist
    for ( $i  =  0 ;  $i  <  11 ;  $i ++)
    {
    // wenn i kleiner 1 (also 0) oder größer 8 (also 9 oder 10, da i ja nicht 11 werden kann, da dann die schleife gar nicht mehr ausgeführt wird) macht er das in {}
             if ( (  $i  <  1  ) or (  $i  >  8  ) )
        {
    // der variable $odatei wird der wert "ABCD" und der wert von $i angehängt, bsp. => ABCD0
                 $odatei  =  "ABCD" . $i ;
    // die datei ABCD0/9/10 wird im schreibmodus (>) geöffnet oder (||) wenn das nicht möglich ist, bricht er mit der fehlermeldung "..." ab 
                 open (  ODATEI ,  "> $odatei "  ) || die  "... $!" ;
    // der variablen $zahl wird der wert $i + 7 zugewiesen (also 0+7, 9+7 oder 10+7)
                 $zahl  =  $i  +  7 ;
    // es wird "hier steht" + der wert von zahl + ein zeilenumbruch (\n) in die datei geschrieben
                 print  ODATEI  "hier steht  $zahl \n" ;
    // die datei wird geschlossen
                 close  (  ODATEI  );
        }
    }
     
  5. 20. Februar 2009
    AW: PERL: Was macht dieses Script?

    Ja, ist für die Schule!

    Danke danke danke, ihr 2 habt echt einen gut bei mir!

    m00pd00p, dich lad ich zum Essen ein

    Viele Grüße!
     
  6. 20. Februar 2009
    AW: PERL: Was macht dieses Script?

    Gut! Ich hab grad ultra-Hunger xD
     
  7. 20. Februar 2009
    AW: PERL: Was macht dieses Script?

    [X] erledigt ?

    closed
     
  8. Video Script

    Videos zum Themenbereich

    * gefundene Videos auf YouTube, anhand der Überschrift.