sort(2) - Array wird nicht richtig sortiert :-( - #107712 (Allgemeines zu Perl)

betterworld

2008-04-02 00:57

User since
2003-08-21
2614 Artikel
ModeratorIn

user image

Code: (dl )

sub sort_leftof {
    my $x1            = shift;
    my $x2            = shift;
    my $t_order        = shift;
    my $nt_order    = shift;
    
    if( $x1 < 500 and $x2 < 500 ) {
        $x1 < $x2;
    }

} # /sort_leftof

Das t_order und nt_order tut nichts.

Die if-Anweisung hat keinen else-Zweig. Was wird zurueckgegeben, wenn die if-Bedingung falsch ist?

Sieht aus wie ein Script, wo jede zweite Zeile fehlt.

Lieblingsmodule: CPAN:

IPC::System::Simple, CPAN:

Path::Class