Script hochladen ? (Seite 2) (Sonstige Beiträge (auch Spaß und Sinnloses))

BrownWolf

2003-08-27 05:08

User since
2003-08-15
308 Artikel
BenutzerIn
[default_avatar]

[quote=esskar,27.08.2003, 01:17]perltidy ist ja nicht die wahl...
du solltest dir beim entwickeln einfach die mühe machen, einzurücken...

bsp.

aus

Code (perl): (dl )

sub get_date {
my($sec,$min,$hour,$day,$month,$year) = (localtime($_[0]))[0..5];
my $datum = sprintf "%02d.%02d.%04d - %02d:%02d:%02d",$day,$month+1,$year+1900,$hour,$min,$sec;
return $datum;
}

sub new_pass {
my @password = ("a".."z","A".."Z",0..9);
my $password = join '', map { $password[int rand @password] } 0..7;
return $password;
}

wird

Code (perl): (dl )

sub get_date
{
    my($sec, $min, $hour, $day, $month, $year) = (localtime($_[0]))[0..5];
    my $datum = sprintf "%02d.%02d.%04d - %02d:%02d:%02d", $day, $month+1, $year+1900, $hour, $min, $sec;
    return $datum;
}

sub new_pass
{
    my @password = ("a".."z","A".."Z",0..9);
    my $password = join '', map { $password[int rand @password] } 0..7;
    return $password;
}

oder so[/quote]
Wenn ich programmiere, dann mach ich das und will nicht erst stundenlang einrücken ;)

Code (perl): ()

1
2
3

sub _{s;;xrqIpiql\\{}p{pl{R>rl{N{}gjwpkssq]>rl{N;;;*{{}=*{_};;
&#36{{}={q{{{}}}=>[reverse+split+reverse+q;}{;]};&#36{{}->{q{{{}}}}->[@{{}];}
&#36{{}=reverse+_(q{{}}=>q{{}})^chr(30)x+length&_(q{{}}=>,q{{}})and+print;

renee

2003-08-27 09:34

User since
2003-08-04
14371 Artikel
ModeratorIn

@BrownWolf: Ich bekomm nen 404er, wenn ich auf Deinen Link gehe...

OTRS-Erweiterungen (http://feature-addons.de/)
Frankfurt Perlmongers (http://frankfurt.pm/)
--

Unterlagen OTRS-Workshop 2012: http://otrs.perl-services.de/workshop.html
Perl-Entwicklung: http://perl-services.de/

Strat

2003-08-27 12:39

User since
2003-08-04
5246 Artikel
ModeratorIn

[quote=BrownWolf,27.08.2003, 03:08]Wenn ich programmiere, dann mach ich das und will nicht erst stundenlang einrücken ;)[/quote]
Damit machst du es dir und uns nur unnoetig schwer, weil durch eine geschickte einrueckung die programmlogik klarer wird, und man findet somit fehler viel schneller. Wie oft zaehlst du Klammern, weil du dich da verhaut hast? Und wie oft versuchst du, da herauszufinden, welche schliessende Klammer jetzt zu welcher oeffnenden Klammer gehoert?
Und ich muss gestehen, dass ich mir Code, der unformatiert ist, nur selten ansehe und dann auch nicht helfe, weil es einfach zu muehseelig waere (code von neulingen vielleicht mal ausgenommen).
Jeder vernuenftige Editor hat eine automatische Einrueckung eingebaut, wenn man z.B. auf die Tabulatortaste drueckt. Wenn nicht, stellt man einfach den Tabulator auf 4 Zeichen, und dann geht's auch recht gut.\n\n

perl -le "s::*erlco'unaty.'.dk':e,y;*kn:ai;penmic;;print"
http://www.fabiani.net/

snadra

2003-08-27 12:47

User since
2003-08-11
265 Artikel
BenutzerIn

Lies Dir doch mal
perldoc perlstyle
durch...

http://hamburg.pm.org
jeden 2. mittwoch im monat
--
#!/usr/bin/perl -w
$l=join('',map chr,(116,110,105,114,112))if$^T;
!!$$?@_=qw(Jhfg Aabgure Prey Hnpxre):$l=1;
for(@_){eval reverse($l)."'"._(_(_($_))).' \''}
sub _{$_=~y+a-z+n-za-m+and pop}

Strat

2003-08-27 13:45

User since
2003-08-04
5246 Artikel
ModeratorIn

[quote=snadra,27.08.2003, 10:47]Lies Dir doch mal
perldoc perlstyle
durch...[/quote]
habe sogar schon begonnen, sie im wiki auf deutsch zu uebersetzen

perl -le "s::*erlco'unaty.'.dk':e,y;*kn:ai;penmic;;print"
http://www.fabiani.net/

esskar

2003-08-27 14:46

User since
2003-08-04
7321 Artikel
ModeratorIn

user image

[quote=Strat,27.08.2003, 10:39]Und ich muss gestehen, dass ich mir Code, der unformatiert ist, nur selten ansehe und dann auch nicht helfe, weil es einfach zu muehseelig waere (code von neulingen vielleicht mal ausgenommen).[/quote]
*unterschreib*

SirLant

2003-08-27 16:15

User since
2003-08-04
516 Artikel
BenutzerIn
[default_avatar]

Wenn ich meinen Code aus SciTE hier rein kopiere, werden die Einrückungen nie mitkopiert, woran könnte das liegen?

Und nen richtiger Editor makiert zusammengehörige Klammern, so ist es ein Kinderspiel festzustellen, wo ne Klammer fehlt(ist bei Einrückungen idR aber immer um einiges leichter)

--Programming today is a race between Software Enginers striving to build bigger and better idiot-proof Programs,
and the Universe trying to produce bigger and better idiots.
So far, the Universe is winning!

format_c

2003-08-27 16:38

User since
2003-08-04
1706 Artikel
HausmeisterIn

[E|B
,27.08.2003, 00:42]Shit! Bei mir wird die .rar Datei im Browser angezeigt. Muss wohl .rar noch installieren. *g*

Rechte Maustaste auf den Link und (beim Konqueror) "Copy to".
Dann auf der Kommandozeile mit RAR entpacken.

Gruß Alex

Effizente Linuxshell

[E|B]

2003-08-27 16:40

User since
2003-08-08
2561 Artikel
HausmeisterIn

Habs mittlerweile rausbekommen! *g*
Normal muss das aber auch anders gehen!

Gruß, Erik!

s))91\&\/\^z->sub{}\(\@new\)=>69\&\/\^z->sub{}\(\@new\)=>124\&\/\^z->sub{}\(\@new\)=>);
$_.=qq~66\&\/\^z->sub{}\(\@new\)=>93~;for(@_=split(/\&\/\^z->sub{}\(\@new\)=>/)){print chr;}

It's not a bug, it's a feature! - [CGI-World.de]

SirLant

2003-08-27 16:53

User since
2003-08-04
516 Artikel
BenutzerIn
[default_avatar]

Mein Mozilla macht das bei rar-files auch oft

--Programming today is a race between Software Enginers striving to build bigger and better idiot-proof Programs,
and the Universe trying to produce bigger and better idiots.
So far, the Universe is winning!