On Thu, Feb 14, 2002 at 12:08:34PM -0500, Yacketta, Ronald wrote:
>($name, $date, $time, $wonid, $cheat, $server) = split(/\|/, $a);
>($wday,$month,$mday,$year) = split(/\s+/, $date);
>($hour,$min,$secs) = split(/:/, $time);
>$TIME = timelocal($secs,$min,$hour,$mday,$mon,$year);
>
Folks,
I have this little sort routine
##
## UGLY HACK to sort the dates correctly
##
($name, $date, $time, $wonid, $cheat, $server) = split(/\|/, $a);
($wday,$month,$mday,$year) = split(/\s+/, $date);
($hour,$min,$secs) = split(/:/, $time);
$TIME = timelocal($secs,$min,$hour,$mday,$
In article <2E4528861499D41199D200A0C9B15BC031B7E8@FRISTX> wrote "Bob Showalter"
<[EMAIL PROTECTED]>:
> Note that the assignment is seen as a term in the list supplied to print, so it will
>be executed
> *before* the prompt is printed. To make the comma into a sequence operator, you
>need to ad
> -Original Message-
> From: Andrea Holstein [mailto:[EMAIL PROTECTED]]
> Sent: Saturday, February 02, 2002 6:14 AM
> To: [EMAIL PROTECTED]
> Subject: Re: quick sort --help me
>
> ...
> Perlish: print "Enter the $_ number", $a[$_-1] = for (1 .. 4);
Not
In article <[EMAIL PROTECTED]> wrote
"Sanilkumar"
<[EMAIL PROTECTED]>:
> this program is not working please help me
Sorry, I couldn't find the error instantly.
But perhaps I can help you to improve your programming style.
1. Give your variables names that explain themselves.
Readability co
this program is not working please help me
for(my $i=0;$i<3;$i++)
{
my $r=$i+1;
print("Enter the $r number");
local$a[$i]=;
}
$first=0;
$last=2;
quicksort(\@a,$first,$last);
system(clear);
print("\t@a");
sub quicksort(\@$$)
{
my($num,$fi,$la)=@_;
print("
