Helpdesk
Menschen Wissenschaft Politik Mystery Kriminalfälle Spiritualität Verschwörungen Technologie Ufologie Natur Umfragen Unterhaltung
weitere Rubriken
PhilosophieTräumeOrteEsoterikLiteraturAstronomieHelpdeskGruppenGamingFilmeMusikClashVerbesserungenAllmysteryEnglish
Diskussions-Übersichten
BesuchtTeilgenommenAlleNeueGeschlossenLesenswertSchlüsselwörter
Schiebe oft benutzte Tabs in die Navigationsleiste (zurücksetzen).

Einstieg in Perl

38 Beiträge ▪ Schlüsselwörter: C, Coding, Perl ▪ Abonnieren: Feed E-Mail
---- Diskussionsleiter
ehemaliges Mitglied

Link kopieren
Lesezeichen setzen

Einstieg in Perl

16.10.2012 um 13:48
Wie viele Leute hier würden gerne ins Thema Programmieren einsteigen?

Wenn Interesse besteht und nicht zu viel erwartet wird biete ich mich gerne dafür an anhand von praxisorientierten Beispielen das Thema für Einsteiger zu eröffnen.


Meine Ausführungen würden sich vorerst auf Perl beschränken. Super Scriptingsprache. C würde folgen.


melden

Einstieg in Perl

16.10.2012 um 13:52
Ich!


melden
---- Diskussionsleiter
ehemaliges Mitglied

Link kopieren
Lesezeichen setzen

Einstieg in Perl

16.10.2012 um 13:55
Sollten schon ein paar Leute zusammenkommen und auch welche mitwirken die schon bissl weiter sind.


melden

Einstieg in Perl

16.10.2012 um 14:02
ich würde mich auch dafür begeistern


melden
---- Diskussionsleiter
ehemaliges Mitglied

Link kopieren
Lesezeichen setzen

Einstieg in Perl

16.10.2012 um 14:03
Und ich welche Richtung wollt ihr gehn?

Wundert mich eh dass es bei den vielen fähigen Leuten hier noch keinen solchen thread gibt. Sind wohl nicht ganz sauber?:)


melden

Einstieg in Perl

16.10.2012 um 14:08
C++
Hab zwar schon ein programm da, aber
mir fehlt die motivation alleine zu lernen.

Weiß zwar nicht genau was perl ist..
Bin aber offen für alles


melden
---- Diskussionsleiter
ehemaliges Mitglied

Link kopieren
Lesezeichen setzen

Einstieg in Perl

16.10.2012 um 14:13
Ich dachte eher an die Art der Programme nicht an die Zielsprache.

Wikipedia: Perl (Programmiersprache)
http://www.perlmonks.org/ (Archiv-Version vom 16.10.2012)
http://perldoc.perl.org/index.html


melden

Einstieg in Perl

16.10.2012 um 14:42
Interessanter Thread, kommt in die Beobachtung.

Wie bist du damals eingestiegen? @----


melden

Einstieg in Perl

16.10.2012 um 14:49
Ich würde mich auch Interessieren.


melden
---- Diskussionsleiter
ehemaliges Mitglied

Link kopieren
Lesezeichen setzen

Einstieg in Perl

16.10.2012 um 14:56
Ich bin vor 4 Tagen in Perl eingestiegen.:)

Hab davor bissl mit C rumgespielt.

Aktuell schreib ich mein erstes Programm in Perl.

Man sollte allerdings dazu sagen dass ich vermutlich irgendwo ein "Freak" bin und die 4 Tage in keiner Relation zum bisherigen Ergebnis stehen.

Hier mal ein kleiner Ausschnitt. Dass da noch Text drin rumschwimmt liegt daran dass ich an dem Bereich noch rumdreh. Die Textausgaben liegen schön gegliedert mit den anderen in einem Array wenn der Block fertig ist.

Geht natürlich auch kürzer und professioneller aber es funktioniert immerhin alles. Das Thema Sicherheit spielt derzeit keine Rolle.

sub COUNT_VAL { $_[1] = join("/",$_[0],$_[1]);$_[1] =~ s/\/\/*/\//g;$_[1] =~ s/\n\s*//g;our $str = stat($_[1]); if(stat($_[1]) && -e $_[1] && $str->cando(S_IRUSR, 1)) { printf "\n\n Dictionary: %s | ", $_[1]; open(FILE, "<$_[1]"); our ($c_words) = (0); while (<FILE>) { $c_words += scalar(split(/\s+/, $_)); }close FILE; print("Words=$c_words | "); printf "Size: %s bytes | ", $str->size; print "Permission: Ok"; $_[2]=$_[2]+$c_words;return($_[2]); } } ### Validate Configuration ### sub VALIDATE { START_VALIDATION: ### validate URL ### ### prepare validate dictionary ### VAL_S_DICT: our @files;our $dir; $dict = FileHandle->new; $sb = stat($conf[2]); $ext = ( fileparse( $conf[2], '\..*$' ) )[2]; $ext =~ s/(\.?[^.?]*)?\?.*?$/$1/; $conf[2] =~ m{([^\\/.]+([^\\/]*)$)};our ($fil) = $1; our @dir_S=split($fil,$conf[2]); if(!($ext)){$dir=$conf[2];}else{$dir="@dir_S";} our $opt = { '1' => "\n\n --> Directory doesn` t exist. Specify existing path to your dictionaryfile:\n\n", '2' => "\n\n --> File doesn` t exist in given folder. See the list below.\n", '3' => "\n\n --> Access denied.\n", '4' => "\n\n --> To use one of the listed files just enter k:file.txt (or .lst) or specify a new path:\n\n", }; ### validate single dictionary ### if(!($ext eq "") && $ext =~m/\btxt\b|\blst\b/i){ if(stat($conf[2]) && -e $conf[2] && $sb->cando(S_IRUSR, 1)) { $count_W=0; COUNT_VAL(@dir_S,$fil,$count_W); } elsif (!($dict->open("< $conf[2]"))) { printf "\n\n\n\nDictionary not found at %s \n\n Reason: ", $conf[2]; if(!(-d $dir)){print $opt->{1};C_TMP();$conf[2]="$tmp";goto VAL_S_DICT;} if(!(-e $conf[2]) && -d $dir)# { print CLEAR WHITE $opt->{2}; @files = `ls -t -1 -r $dir/`; print CLEAR WHITE "\n Content of: $dir \n\n"; foreach $fi (@files) { $fi =~ s/\n*//g;print CLEAR "$fi | "; } print CLEAR WHITE $opt->{4}; C_TMP(); if ($tmp =~m/^k:/i) { $tmp = "$'"; $conf[2] = join('/', $dir, $tmp); goto VAL_S_DICT; } else{$conf[2]="$tmp";goto VAL_S_DICT;} } if(!($sb->cando(S_IRUSR, 1))) { print $opt->{3}; C_TMP(); if(!($tmp) || $tmp eq "\n"){goto VAL_S_DICT;} else{$conf[2]="$tmp";goto VAL_S_DICT;} }$dict->close; } } elsif(!($ext eq "") && !($ext =~m/\btxt\b|\blst\b/i)) { print"\nTypo? Extension of given file is not valid: $ext \nEnter full path to your dictionary (.txt or .lst): "; C_TMP();$conf[2]="$tmp";goto VAL_S_DICT; } ### validate multiple dictionaries ### elsif($ext eq "" && -d $dir) { print CLEAR WHITE "\n\n"; @files = `ls -t -1 -r $dir`; our $ko; our $th=0;our $ex; our $n; our $tb;our @file_list=(); foreach $ko (@files) { SPLITTER($ko);$ex=$_; if($ex =~m/txt|lst/i){$file_list[$th]=$ko;$th++;} } if($#file_list <= 0){print CLEAR "\n\n No files with valid extensions ( .txt | .lst ) found.\n\nEnter path to valid dictionaries: ";C_TMP();goto VAL_S_DICT;} else{print CLEAR "\n Will use following dictionaries in given folder $dir \n\n"; $count_W = 0; foreach $n (@file_list) { COUNT_VAL($dir,$n,$count_W); } } } elsif($ext eq "" && !(-d $dir)) { print"\n\nDirectory $dir doesn` t exist. \n\nPlease enter a valid path to your dictionaries: "; C_TMP();$conf[2]="$tmp";goto VAL_S_DICT; }


4x zitiertmelden

Einstieg in Perl

16.10.2012 um 15:51
@----
Bitte mal den Rahmen vorgeben:

- ab wievielen Leuten willst du starten?
- wie lange willst du "unterrichten"?
- In welcher Form? Tuturials? über youtube? Textform?
- welche Zielgruppe sprichst du an?
- welche Lehrziele gibst du in welcher Konkretisierung denn vor?


1x zitiertmelden

Einstieg in Perl

16.10.2012 um 15:54
darf man hier auch Wünsche äussern, was man gerne programmiert hätte oder wie man dies programmiert ?


melden

Einstieg in Perl

16.10.2012 um 15:58
Interessanter Thread.
Unter der Haube von Allmystery steckt übrigens auch sehr viel Perl :D

Vielleicht motiviert euch das was für tolle Sachen man damit machen kann :P


melden

Einstieg in Perl

16.10.2012 um 16:06
@Lightstorm

Hey Ultimatum ! Schönen Gruss ... :)


melden

Einstieg in Perl

16.10.2012 um 16:09
@nemo

Hey grüß dich auch :D
Schön dich noch hier zu sehen :)


melden

Einstieg in Perl

16.10.2012 um 16:13
@Lightstorm

... ja hin und wieder noch an Bord. Sind ja nicht mehr viele hier, der ersten Stunde.

Der Bericht, gibts noch nen update ? v.3.23 *g*


melden
---- Diskussionsleiter
ehemaliges Mitglied

Link kopieren
Lesezeichen setzen

Einstieg in Perl

16.10.2012 um 16:28
Lass den begriff unterrichten weg. Es reicht sicherlich um den Einstieg zu ermöglichen dennoch bin ich Anfänger. Egal wie schnell jemand ist, das Thema im gesamten ist umfangreich und allein die Menge an Möglichkeiten, Funktionen und Informationen sind ein recht üppiges Paket dass man nicht mal nebenbei in ein paar Tagen so mit nimmt.

Das ich kein Alleinunterhalter bin sollte auch klar sein. Da ich wie erwähnt Anfänger bin sind Bugs vorprogrammiert. Debuggen ist das halbe Leben.
Zitat von CesairCesair schrieb:wie lange willst du "unterrichten"?"
Bis das eine Programm fertig ist. Es beinhaltet alles was interessant ist. Socketprogrammierung, Networking, Filerhandling, Umgang mit In-Output, Subroutinen und wie man Variablen übergibt, Loops, Verschlüsselungsmöglichkeiten etc.

Ich dachte daran klein Anzufangen und mit Ausschnitten aus dem Programm zu arbeiten. Zeile für Zeile. Allerdings bissl präziser als einfache Kommentarzeilen.

Aufgaben lassen sich sicherlich mit einbeziehen. Ein Konzept hab ich nicht. Das hello world Programm ist allerdings nichts das hier in irgendeiner Form berücksichtigt wird. Der Start sollte schon bissl saftiger sein.
Zitat von CesairCesair schrieb:welche Zielgruppe sprichst du an?
Networker. Linuxuser. Windows wird nicht berücksichtigt. Es sind evtl. Teile vorhanden die nicht ohne weiteres auf Windowsrechnern laufen.
welche Lehrziele gibst du in welcher Konkretisierung denn vor?
Keine.


Voraussetzungen:
Umgang mit dem Terminal, perl installiert, ein Texteditor und vll. etwas mehr Kaffee als gewöhnlich und Eigeninitiative.



melden
---- Diskussionsleiter
ehemaliges Mitglied

Link kopieren
Lesezeichen setzen

Einstieg in Perl

16.10.2012 um 21:55
Nix mehr?


melden

Einstieg in Perl

17.10.2012 um 15:20
@----

„Der eine wartet, daß die Zeit sich wandelt. Der andere packt sie kräftig an - Und handelt.“
Dante Alighieri (1265-1321), ital. Dichter.

:D


melden

Einstieg in Perl

17.10.2012 um 15:24
bei windo bin ich dabei,
alles andere läuft ohne mich


melden