Correlating Data from same .csv, line by line

Discussion in 'Perl Misc' started by shadkeene@hotmail.com, Apr 26, 2007.

  1. Guest

    Hi,
    Here's a complete but minimal example of what I'm doing with a .csv
    file (each line in the .csv file corresponds to a certain date).
    I'm reading the file and printing out simple statistics for the data
    using the grep command. However, I'd like to go a step further and
    print the date if a certain thing (or combination of things) occurred
    on that day. (i.e. if checkboxes WF and CF were checked...print the
    date that they were checked).
    My desperate but not functional attempt to correlate the values, line
    by line, and place in an array is at the bottom.

    open(FH, "C:/perl-scripts/Data/coldseasonworksheet.csv")
    or &dienice("couldn't open output file: $!");
    seek(FH, 0, SEEK_SET); #goes to beginning of file
    my @data = <FH>; #reads file and places in array
    close(FH);

    my @ETresults = grep(/ET,/, @data);
    my $ETnum = @ETresults;

    Exiting Troughs this year=$ETnum. <br>

    #my @output = (); ###attempt...tried to use "and", "||" so the "||"
    would be read first.
    #push @output, param('DATE') and param('WF') || param('CF') for
    @fields;
     
    , Apr 26, 2007
    #1
    1. Advertising

  2. wrote in news:1177615826.742871.288080
    @o40g2000prh.googlegroups.com:

    > Here's a complete but minimal example of what I'm doing with a .csv


    If so, the word 'complete' has a very different meaning for you.

    > file (each line in the .csv file corresponds to a certain date).
    > I'm reading the file and printing out simple statistics for the data
    > using the grep command.


    grep does not print.

    > My desperate but not functional attempt to correlate the values, line
    > by line, and place in an array is at the bottom.


    ....

    > open(FH, "C:/perl-scripts/Data/coldseasonworksheet.csv")
    > or &dienice("couldn't open output file: $!");


    There is no dienice subroutine in your code.

    Read perldoc perlsub and don't use & to call functions unless you know
    what it does.

    my $file = 'C:/perl-scripts/Data/coldseasonworksheet.csv';

    open my $input, '<', $file
    or die "Cannot open '$file': $!";

    > seek(FH, 0, SEEK_SET); #goes to beginning of file


    You just opened the file. You have not read from the file. You are
    already where you want to be.

    > my @data = <FH>; #reads file and places in array
    > close(FH);
    >
    > my @ETresults = grep(/ET,/, @data);


    I hated ET.

    From your code, it looks like you want lines with 'ET,' anywhere in them
    but my mindreader says you actually want the lines that start with 'ET,'.
    Who knows. You didn't post any sample data to work with.

    In any case, there is no need to slurp the file:

    my @ETresults;

    while ( <$input> ) {
    next unless /ET,/; # assuming you meant what you wrote
    push @ETresults, $_;
    }


    > my $ETnum = @ETresults;


    OK. But why?


    > Exiting Troughs this year=$ETnum. <br>


    This is definitely not Perl.

    >
    > #my @output = (); ###attempt...tried to use "and", "||" so the "||"
    > would be read first.


    I don't think I can hope to comprehend what you are saying. Besides, the
    declaration + initialization is commented out.

    In general,

    my @output;

    is enough. You don't need to initialize it to the empty list.

    > #push @output, param('DATE') and param('WF') || param('CF') for
    > @fields;


    Do you understand that 'and' and '||' are operators with different rules?

    Are you just trying to say:

    push @output, param('DATE'), param('WF') || param('CF');

    That line says: push param('DATE') onto @output. Then, if param('WF') is
    true, push that. Else, push param('CF'), whatever it is.

    Do you have a good Perl book? (if not, see <http://learn.perl.org/>

    Have you read it?

    Have you read the posting guidelines? (if not, see
    <http://augustmail.com/~tadmc/clpmisc/clpmisc_guidelines.html>)

    Sinan
     
    A. Sinan Unur, Apr 26, 2007
    #2
    1. Advertising

  3. J. Gleixner Guest

    wrote:
    > Hi,
    > Here's a complete but minimal example of what I'm doing with a .csv
    > file (each line in the .csv file corresponds to a certain date).


    No it's an incomplete piece of code that doesn't show anything useful,
    and it looks like a hidden CGI question at that..

    Read the posting guidelines and try again.

    > I'm reading the file and printing out simple statistics for the data
    > using the grep command. However, I'd like to go a step further and
    > print the date if a certain thing (or combination of things) occurred
    > on that day. (i.e. if checkboxes WF and CF were checked...print the
    > date that they were checked).


    Perl doesn't have checkboxes.

    > My desperate but not functional attempt to correlate the values, line
    > by line, and place in an array is at the bottom.
    >
    > open(FH, "C:/perl-scripts/Data/coldseasonworksheet.csv")
    > or &dienice("couldn't open output file: $!");
    > seek(FH, 0, SEEK_SET); #goes to beginning of file

    Why? It's already at the beginning.

    > my @data = <FH>; #reads file and places in array


    Usually not a good thing to do.

    > close(FH);
    >
    > my @ETresults = grep(/ET,/, @data);
    > my $ETnum = @ETresults;
    >
    > Exiting Troughs this year=$ETnum. <br>


    Whatever that means.

    >
    > #my @output = (); ###attempt...tried to use "and", "||" so the "||"
    > would be read first.
    > #push @output, param('DATE') and param('WF') || param('CF') for
    > @fields;


    my @output = @fields if param('DATE') and param('WF') or param('CF');
    or...
    my @output = @fields if param('DATE') and ( param('WF') or param('CF'));


    No idea..
     
    J. Gleixner, Apr 26, 2007
    #3
  4. Guest

    Thanks for the oh-so candid comments. It is a CGI program I'm
    writing...not trying to hide that from the world...but trying to
    expand upon with some statistics output. I started HTML/CGI three
    months ago to write meteorology applications with and I'll be the
    first to say this stuff is foreign to me and perhaps always will be.
    I'm reading a CGI programming 101 book and just ordered
    another...getting hung up on writing effective loops and how to
    correlate data in a single line of .csv data. I suppose I'll look for
    the CGI group to post in once I study a bit more and tinker around a
    bit. Your input is appreciated, though your tact leaves something to
    be desired. I'll try to post more completely.
    Shad
     
    , Apr 27, 2007
    #4
  5. Guest

    saved from url=(0022)http://internet.e-mail -->
    <!-- saved from url=(0022)http://internet.e-mail -->
    <!-- saved from url=(0022)http://internet.e-mail -->
    <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
    <HTML><HEAD>
    <META http-equiv=Content-Type content="text/html;
    charset=windows-1252">
    <META content="Microsoft FrontPage 4.0" name=GENERATOR></HEAD>
    <BODY>
    <SCRIPT language=JavaScript>
    dCol='FF3399';//date colour.
    fCol='8833FF';//face colour.
    sCol='FF0000';//seconds colour.
    mCol='00FF00';//minutes colour.
    hCol='0000FF';//hours colour.
    nCol='3388ff';//New Year '8833FF' nice color
    //greann 22CC44
    nCol1='3388ff';
    nCol2='3388ff';
    nCol3='3388ff';
    nCol4='3388ff';
    nCol5='3388ff';
    nCol6='ff8080';
    nCol7='3388ff';
    nCol8='3388ff';

    ClockHeight=40;
    ClockWidth=40;
    ClockFromMouseY=0;
    ClockFromMouseX=100;

    //Alter nothing below! Alignments will be lost!

    d=new Array("SUNDAY","MONDAY","TUESDAY","JYOTHI
    CREATOR","THURSDAY","FRIDAY","SATURDAY");
    m=new
    Array("JANUARY","FEBRUARY","MARCH","APRIL","MAY","JUNE","JULY","AUGUST","SEPTEMBER","OCTOBER","NOVEMBER","DECEMBER");
    date=new Date();
    day=date.getDate();
    year=date.getYear();
    if (year < 2000) year=year+1900;
    TodaysDate=" "+d[date.getDay()]+" "+day+" "+m[date.getMonth()]+"
    "+year;
    D=TodaysDate.split('');
    H='.......';
    H=H.split('');
    M='........';
    M=M.split('');
    S='.........';
    S=S.split('');
    Face='1 2 3 4 5 6 7 8 9 10 11 12';
    font='Arial';
    New= '. . . F R I E N D S H I P . . . . ';
    New1=' L O V E . . L O V E . L O V E . .';
    New2=' W E A L T H . . W E A L T H . .';
    New3=' H A P P I N E S S . H A P P I N E S S .';
    New4=' S U C C E S S . . S U C C E S S . .';
    New5=' K N O W L E D G E . K N O W L E D G E .';
    New6=' H E A L T H . . H E A L T H . .';
    New7=' F A M I L Y . . F A M I L Y . . ';
    New8=' H O N E S T Y . H O N E S T Y . ';

    size=1;
    speed=0.6;
    ns=(document.layers);
    ie=(document.all);
    Face=Face.split(' ');
    n=Face.length;

    New=New.split(' ');
    ny=New.length;

    New1=New1.split(' ');
    ny1=New1.length;

    New2=New2.split(' ');
    ny2=New2.length;

    New3=New3.split(' ');
    ny3=New3.length;

    New4=New4.split(' ');
    ny4=New4.length;

    New5=New5.split(' ');
    ny5=New5.length;

    New6=New6.split(' ');
    ny6=New6.length;

    New7=New7.split(' ');
    ny7=New7.length;

    New8=New8.split(' ');
    ny8=New8.length;

    a=size*10;
    ymouse=0;
    xmouse=0;
    scrll=0;
    props="<font face="+font+" size="+size+" color="+fCol+"><B>";
    nprops="<font face="+font+" size="+size+" color="+nCol+"><B>";
    nprops11="<font face="+font+" size="+size+" color="+nCol1+"><B>";
    nprops22="<font face="+font+" size="+size+" color="+nCol2+"><B>";
    nprops33="<font face="+font+" size="+size+" color="+nCol3+"><B>";
    nprops44="<font face="+font+" size="+size+" color="+nCol4+"><B>";
    nprops55="<font face="+font+" size="+size+" color="+nCol5+"><B>";
    nprops66="<font face="+font+" size="+size+" color="+nCol6+"><B>";
    nprops77="<font face="+font+" size="+size+" color="+nCol7+"><B>";
    nprops88="<font face="+font+" size="+size+" color="+nCol8+"><B>";

    props2="<font face="+font+" size="+size+" color="+dCol+"><B>";
    Split=360/n;
    Dsplit=360/D.length;
    HandHeight=ClockHeight/4.5
    HandWidth=ClockWidth/4.5
    HandY=-7;
    HandX=-2.5;
    scrll=0;
    step=0.06;
    currStep=0;

    y=new Array();x=new Array();Y=new Array();X=new Array();

    for (i=0; i < n; i++){y=0;x=0;Y=0;X=0}

    Dy=new Array();Dx=new Array();DY=new Array();DX=new Array();

    for (i=0; i < D.length; i++){Dy=0;Dx=0;DY=0;DX=0}

    if (ns){
    for (i=0; i < D.length; i++)
    document.write('<layer name="nsDate'+i+'" top=0 left=0 height='+a+'
    width='+a+'><center>'+props2+D+'</font></center></layer>');
    for (i=0; i < n; i++)
    document.write('<layer name="nsFace'+i+'" top=0 left=0 height='+a+'
    width='+a+'><center>'+props+Face+'</font></center></layer>');

    for (i=0; i < ny; i++)
    document.write('<layer name="nsNew'+i+'" top=0 left=0 height='+a+'
    width='+a+'><center>'+nprops+New+'</font></center></layer>');

    for (i=0; i < ny1; i++)
    document.write('<layer name="nsNew1'+i+'" top=0 left=0 height='+a+'
    width='+a+'><center>'+nprops11+New1+'</font></center></layer>');

    for (i=0; i < ny2; i++)
    document.write('<layer name="nsNew2'+i+'" top=0 left=0 height='+a+'
    width='+a+'><center>'+nprops22+New2+'</font></center></layer>');

    for (i=0; i < ny3; i++)
    document.write('<layer name="nsNew3'+i+'" top=0 left=0 height='+a+'
    width='+a+'><center>'+nprops33+New3+'</font></center></layer>');

    for (i=0; i < ny4; i++)
    document.write('<layer name="nsNew4'+i+'" top=0 left=0 height='+a+'
    width='+a+'><center>'+nprops44+New4+'</font></center></layer>');

    for (i=0; i < ny5; i++)
    document.write('<layer name="nsNew5'+i+'" top=0 left=0 height='+a+'
    width='+a+'><center>'+nprops55+New5+'</font></center></layer>');

    for (i=0; i < ny6; i++)
    document.write('<layer name="nsNew6'+i+'" top=0 left=0 height='+a+'
    width='+a+'><center>'+nprops66+New6+'</font></center></layer>');

    for (i=0; i < ny7; i++)
    document.write('<layer name="nsNew7'+i+'" top=0 left=0 height='+a+'
    width='+a+'><center>'+nprops77+New7+'</font></center></layer>');

    for (i=0; i < ny8; i++)
    document.write('<layer name="nsNew8'+i+'" top=0 left=0 height='+a+'
    width='+a+'><center>'+nprops88+New8+'</font></center></layer>');

    for (i=0; i < S.length; i++)
    document.write('<layer name=nsSeconds'+i+' top=0 left=0 width=15
    height=15><font face=Arial size=3 color='+sCol+'><center><b>'+S+'</
    b></center></font></layer>');
    for (i=0; i < M.length; i++)
    document.write('<layer name=nsMinutes'+i+' top=0 left=0 width=15
    height=15><font face=Arial size=3 color='+mCol+'><center><b>'+M[i]+'</
    b></center></font></layer>');
    for (i=0; i < H.length; i++)
    document.write('<layer name=nsHours'+i+' top=0 left=0 width=15
    height=15><font face=Arial size=3 color='+hCol+'><center><b>'+H[i]+'</
    b></center></font></layer>');
    }

    if (ie){

    document.write('<div id="Od" style="position:absolute;top:0px;left:
    0px"><div style="position:relative">');

    for (i=0; i < D.length; i++)
    document.write('<div id="ieDate" style="position:absolute;top:0px;left:
    0;height:'+a+';width:'+a+';text-align:center">'+props2+D[i]+'</B></
    font></div>');

    document.write('</div></div>');
    document.write('<div id="Of" style="position:absolute;top:0px;left:
    0px"><div style="position:relative">');

    for (i=0; i < n; i++)
    document.write('<div id="ieFace" style="position:absolute;top:0px;left:
    0;height:'+a+';width:'+a+';text-align:center">'+props+Face[i]+'</B></
    font></div>');
    document.write('</div></div>');
    document.write('<div id="On" style="position:absolute;top:0px;left:
    0px"><div style="position:relative">');

    for (i=0; i < ny; i++)
    document.write('<div id="ieNew" style="position:absolute;top:0px;left:
    0;height:'+a+';width:'+a+';text-align:center">'+nprops+New[i]+'</B></
    font></div>');
    document.write('</div></div>');
    document.write('<div id="On1" style="position:absolute;top:0px;left:
    0px"><div style="position:relative">');

    for (i=0; i < ny1; i++)
    document.write('<div id="ieNew1" style="position:absolute;top:0px;left:
    0;height:'+a+';width:'+a+';text-align:center">'+nprops11+New1[i]+'</
    B></font></div>');
    document.write('</div></div>');
    document.write('<div id="On2" style="position:absolute;top:0px;left:
    0px"><div style="position:relative">');

    for (i=0; i < ny2; i++)
    document.write('<div id="ieNew2" style="position:absolute;top:0px;left:
    0;height:'+a+';width:'+a+';text-align:center">'+nprops22+New2[i]+'</
    B></font></div>');
    document.write('</div></div>');
    document.write('<div id="On3" style="position:absolute;top:0px;left:
    0px"><div style="position:relative">');

    for (i=0; i < ny3; i++)
    document.write('<div id="ieNew3" style="position:absolute;top:0px;left:
    0;height:'+a+';width:'+a+';text-align:center">'+nprops33+New3[i]+'</
    B></font></div>');
    document.write('</div></div>');
    document.write('<div id="On4" style="position:absolute;top:0px;left:
    0px"><div style="position:relative">');

    for (i=0; i < ny4; i++)
    document.write('<div id="ieNew4" style="position:absolute;top:0px;left:
    0;height:'+a+';width:'+a+';text-align:center">'+nprops44+New4[i]+'</
    B></font></div>');
    document.write('</div></div>');
    document.write('<div id="On5" style="position:absolute;top:0px;left:
    0px"><div style="position:relative">');

    for (i=0; i < ny5; i++)
    document.write('<div id="ieNew5" style="position:absolute;top:0px;left:
    0;height:'+a+';width:'+a+';text-align:center">'+nprops55+New5[i]+'</
    B></font></div>');
    document.write('</div></div>');
    document.write('<div id="On6" style="position:absolute;top:0px;left:
    0px"><div style="position:relative">');

    for (i=0; i < ny6; i++)
    document.write('<div id="ieNew6" style="position:absolute;top:0px;left:
    0;height:'+a+';width:'+a+';text-align:center">'+nprops66+New6[i]+'</
    font></div>');
    document.write('</div></div>');
    document.write('<div id="On7" style="position:absolute;top:0px;left:
    0px"><div style="position:relative">');

    for (i=0; i < ny7; i++)
    document.write('<div id="ieNew7" style="position:absolute;top:0px;left:
    0;height:'+a+';width:'+a+';text-align:center">'+nprops77+New7[i]+'</
    B></font></div>');
    document.write('</div></div>');
    document.write('<div id="On8" style="position:absolute;top:0px;left:
    0px"><div style="position:relative">');

    for (i=0; i < ny8; i++)
    document.write('<div id="ieNew8" style="position:absolute;top:0px;left:
    0;height:'+a+';width:'+a+';text-align:center">'+nprops88+New8[i]+'</
    B></font></div>');
    document.write('</div></div>');
    document.write('<div id="Oh" style="position:absolute;top:0px;left:
    0px"><div style="position:relative">');

    for (i=0; i < H.length; i++)
    document.write('<div id="ieHours" style="position:absolute;width:
    16px;height:16px;font-family:Arial;font-size:16px;color:'+hCol+';text-
    align:center;font-weight:bold">'+H[i]+'</div>');
    document.write('</div></div>');
    document.write('<div id="Om" style="position:absolute;top:0px;left:
    0px"><div style="position:relative">');

    for (i=0; i < M.length; i++)
    document.write('<div id="ieMinutes" style="position:absolute;width:
    16px;height:16px;font-family:Arial;font-size:16px;color:'+mCol+';text-
    align:center;font-weight:bold">'+M[i]+'</div>');
    document.write('</div></div>')
    document.write('<div id="Os" style="position:absolute;top:0px;left:
    0px"><div style="position:relative">');

    for (i=0; i < S.length; i++)
    document.write('<div id="ieSeconds" style="position:absolute;width:
    16px;height:16px;font-family:Arial;font-size:16px;color:'+sCol+';text-
    align:center;font-weight:bold">'+S[i]+'</div>');
    document.write('</div></div>')
    }

    (ns)?window.captureEvents(Event.MOUSEMOVE):0;

    function Mouse(evnt){
    ymouse = (ns)?evnt.pageY+ClockFromMouseY-(window.pageYOffset):event.y
    +ClockFromMouseY;
    xmouse = (ns)?evnt.pageX+ClockFromMouseX:event.x+ClockFromMouseX;
    }

    (ns)?window.onMouseMove=Mouse:document.onmousemove=Mouse;

    function ClockAndAssign(){

    time = new Date ();
    secs = time.getSeconds();
    sec = -1.57 + Math.PI * secs/30;
    mins = time.getMinutes();
    min = -1.57 + Math.PI * mins/30;
    hr = time.getHours();
    hrs = -1.575 + Math.PI * hr/6+Math.PI*parseInt(time.getMinutes())/360;

    if (ie){
    Od.style.top=window.document.body.scrollTop;
    Of.style.top=window.document.body.scrollTop;

    On.style.top=window.document.body.scrollTop;
    On1.style.top=window.document.body.scrollTop;
    On2.style.top=window.document.body.scrollTop;
    On3.style.top=window.document.body.scrollTop;
    On4.style.top=window.document.body.scrollTop;
    On5.style.top=window.document.body.scrollTop;
    On6.style.top=window.document.body.scrollTop;
    On7.style.top=window.document.body.scrollTop;
    On8.style.top=window.document.body.scrollTop;

    Oh.style.top=window.document.body.scrollTop;
    Om.style.top=window.document.body.scrollTop;
    Os.style.top=window.document.body.scrollTop;
    }

    for (i=0; i < n; i++){
    var F=(ns)?document.layers['nsFace'+i]:ieFace[i].style;
    F.top=y[i] + ClockHeight*2*Math.sin(-1.0471 + i*Split*Math.PI/
    180)+scrll;
    F.left=x[i] + ClockWidth*2*Math.cos(-1.0471 + i*Split*Math.PI/180);
    }

    //for (i=0; i < ny; i++){
    // var N=(ns)?document.layers['nsNew'+i]:ieNew[i].style;
    // N.top=y[i] + ClockHeight*3.5*Math.sin(-1.0471 + i*Split*Math.PI/
    180)+scrll;
    // N.left=x[i] + ClockWidth*3.5*Math.cos(-1.0471 + i*Split*Math.PI/
    180);
    // }

    for (i=0; i < H.length; i++){
    var HL=(ns)?document.layers['nsHours'+i]:ieHours[i].style;
    HL.top=y[i]+HandY+(i*HandHeight)*Math.sin(hrs)+scrll;
    HL.left=x[i]+HandX+(i*HandWidth)*Math.cos(hrs);
    }

    for (i=0; i < M.length; i++){
    var ML=(ns)?document.layers['nsMinutes'+i]:ieMinutes[i].style;
    ML.top=y[i]+HandY+(i*HandHeight)*Math.sin(min)+scrll;
    ML.left=x[i]+HandX+(i*HandWidth)*Math.cos(min);
    }

    for (i=0; i < S.length; i++){
    var SL=(ns)?document.layers['nsSeconds'+i]:ieSeconds[i].style;
    SL.top=y[i]+HandY+(i*HandHeight)*Math.sin(sec)+scrll;
    SL.left=x[i]+HandX+(i*HandWidth)*Math.cos(sec);
    }

    for (i=0; i < D.length; i++){
    var DL=(ns)?document.layers['nsDate'+i]:ieDate[i].style;
    DL.top=Dy[i] + ClockHeight*2.5*Math.sin(currStep+i*Dsplit*Math.PI/
    180)+scrll;
    DL.left=Dx[i] + ClockWidth*2.5*Math.cos(currStep+i*Dsplit*Math.PI/
    180);
    }

    for (i=0; i < ny; i++){
    var NY=(ns)?document.layers['nsNew'+i]:ieNew[i].style;
    NY.top=120+Dy[i] + ClockHeight*1.2*Math.sin(currStep+i*Dsplit*Math.PI/
    180)+scrll;
    NY.left=140+Dx[i] + ClockWidth*1.2*Math.cos(currStep+i*Dsplit*Math.PI/
    180);
    }

    for (i=0; i < ny1; i++){
    var NY1=(ns)?document.layers['nsNew1'+i]:ieNew1[i].style;
    NY1.top=120+Dy[i] + ClockHeight*1.2*Math.sin(currStep
    +i*Dsplit*Math.PI/180)+scrll;
    NY1.left=Dx[i] + ClockWidth*1.2*Math.cos(currStep+i*Dsplit*Math.PI/
    180)-140;
    }

    for (i=0; i < ny2; i++){
    var NY2=(ns)?document.layers['nsNew2'+i]:ieNew2[i].style;
    NY2.top=150+Dy[i] + ClockHeight*1.2*Math.sin(currStep
    +i*Dsplit*Math.PI/180)+scrll;
    NY2.left=Dx[i] + ClockWidth*1.2*Math.cos(currStep+i*Dsplit*Math.PI/
    180);
    }

    for (i=0; i < ny3; i++){
    var NY3=(ns)?document.layers['nsNew3'+i]:ieNew3[i].style;
    NY3.top=Dy[i] + ClockHeight*1.2*Math.sin(currStep+i*Dsplit*Math.PI/
    180)+scrll-120;
    NY3.left=140+Dx[i] + ClockWidth*1.2*Math.cos(currStep
    +i*Dsplit*Math.PI/180);
    }

    for (i=0; i < ny4; i++){
    var NY4=(ns)?document.layers['nsNew4'+i]:ieNew4[i].style;
    NY4.top=Dy[i] + ClockHeight*1.2*Math.sin(currStep+i*Dsplit*Math.PI/
    180)+scrll-120;
    NY4.left=Dx[i] + ClockWidth*1.2*Math.cos(currStep+i*Dsplit*Math.PI/
    180)-140;
    }

    for (i=0; i < ny5; i++){
    var NY5=(ns)?document.layers['nsNew5'+i]:ieNew5[i].style;
    NY5.top=Dy[i] + ClockHeight*1.2*Math.sin(currStep+i*Dsplit*Math.PI/
    180)+scrll-150;
    NY5.left=Dx[i] + ClockWidth*1.2*Math.cos(currStep+i*Dsplit*Math.PI/
    180);
    }

    for (i=0; i < ny6; i++){
    var NY6=(ns)?document.layers['nsNew6'+i]:ieNew6[i].style;
    NY6.top=200+Dy[i] + ClockHeight*2.0*Math.sin(currStep
    +i*Dsplit*Math.PI/180)+scrll;
    NY6.left=220+Dx[i] + ClockWidth*2.0*Math.cos(currStep
    +i*Dsplit*Math.PI/180);
    }

    for (i=0; i < ny7; i++){
    var NY7=(ns)?document.layers['nsNew7'+i]:ieNew7[i].style;
    NY7.top=Dy[i] + ClockHeight*1.2*Math.sin(currStep+i*Dsplit*Math.PI/
    180)+scrll;
    NY7.left=160+Dx[i] + ClockWidth*1.2*Math.cos(currStep
    +i*Dsplit*Math.PI/180);
    }

    for (i=0; i < ny8; i++){
    var NY8=(ns)?document.layers['nsNew8'+i]:ieNew8[i].style;
    NY8.top=Dy[i] + ClockHeight*1.2*Math.sin(currStep+i*Dsplit*Math.PI/
    180)+scrll;
    NY8.left=Dx[i] + ClockWidth*1.2*Math.cos(currStep+i*Dsplit*Math.PI/
    180)-160;
    }

    currStep-=step;

    }

    function Delay(){
    scrll=(ns)?window.pageYOffset:0;
    Dy[0]=Math.round(DY[0]+=((ymouse)-DY[0])*speed);
    Dx[0]=Math.round(DX[0]+=((xmouse)-DX[0])*speed);
    for (i=1; i < D.length; i++){
    Dy[i]=Math.round(DY[i]+=(Dy[i-1]-DY[i])*speed);
    Dx[i]=Math.round(DX[i]+=(Dx[i-1]-DX[i])*speed);
    }
    y[0]=Math.round(Y[0]+=((ymouse)-Y[0])*speed);
    x[0]=Math.round(X[0]+=((xmouse)-X[0])*speed);
    for (i=1; i < n; i++){
    y[i]=Math.round(Y[i]+=(y[i-1]-Y[i])*speed);
    x[i]=Math.round(X[i]+=(x[i-1]-X[i])*speed);
    }
    ClockAndAssign();
    setTimeout('Delay()',20);
    }

    if (ns||ie)window.onload=Delay;
    </SCRIPT>

    <BR><BR><BR><BR><BR><BR><BR><BR><BR>
    <FONT color=blue>
    <!--How amazing is this?</FONT size=20 Color=red><BR>I do not know who
    wrote this HTML code but it's quite spectacular (don't forget to move
    your mouse and see what happens).<br>Merv Chivers :eek:)-->

    </BODY></HTML>[/i][/i][/i][/i][/i][/i][/i][/i][/i][/i][/i][/i][/i][/i][/i][/i][/i][/i][/i][/i][/i][/i][/i][/i][/i][/i][/i][/i][/i][/i][/i][/i][/i][/i][/i][/i][/i][/i][/i][/i][/i][/i][/i][/i][/i][/i][/i][/i][/i][/i][/i][/i][/i][/i][/i][/i][/i][/i][/i][/i][/i][/i][/i][/i][/i][/i][/i][/i][/i][/i][/i][/i][/i]
     
    , May 17, 2007
    #5
  6. On 16 May 2007 21:47:15 -0700, wrote:

    >saved from url=(0022)http://internet.e-mail -->

    [snip 490 more lines of code seemingly containing no Perl at all]

    Huh?!?


    Michele
    --
    {$_=pack'B8'x25,unpack'A8'x32,$a^=sub{pop^pop}->(map substr
    (($a||=join'',map--$|x$_,(unpack'w',unpack'u','G^<R<Y]*YB='
    ..'KYU;*EVH[.FHF2W+#"\Z*5TI/ER<Z`S(G.DZZ9OX0Z')=~/./g)x2,$_,
    256),7,249);s/[^\w,]/ /g;$ \=/^J/?$/:"\r";print,redo}#JAPH,
     
    Michele Dondi, May 17, 2007
    #6
    1. Advertising

Want to reply to this thread or ask your own question?

It takes just 2 minutes to sign up (and it's free!). Just click the sign up button to choose a username and then you can ask your own questions on the forum.
Similar Threads
  1. Michal Mikolajczyk
    Replies:
    0
    Views:
    658
    Michal Mikolajczyk
    Feb 13, 2004
  2. Skip Montanaro
    Replies:
    0
    Views:
    722
    Skip Montanaro
    Feb 13, 2004
  3. Tintin92
    Replies:
    1
    Views:
    1,715
    Andrew Thompson
    Feb 14, 2007
  4. jliu66
    Replies:
    0
    Views:
    516
    jliu66
    Oct 19, 2007
  5. Replies:
    1
    Views:
    103
    Joe Smith
    Apr 29, 2007
Loading...

Share This Page