Message boards :
Cafe SETI :
Stupid things I do when I've got too much free time
Message board moderation
Author | Message |
---|---|
jrmm22 Send message Joined: 30 Jan 04 Posts: 353 Credit: 24,536,157 RAC: 0 |
Today I was looking at rock while the air slowly eroded it, and then I thought.. hey... So I've parsed this file just to see which OS has crunched the most... So I've got this results: >>> 335151942 resultados para UNIX: 67 sistemas operativos 17.0463864358054 %. >>> 1611850349 resultados para WINDOWS: 75 sistemas operativos 81.981395547879 %. >>> 19114946 resultados para otros: 30 sistemas operativos 0.972218016315575 %. >>> 1966117237 resultados. I didn't parse the total time or average time, so feel free to do that... and the results are not perfect, there's a "Wi.dows" that goes into OTROS, but it's only 1 result so I couldn't care less. here's my stupid little perl code. <pre style="white-space:pre-wrap; "> @ALL=`cat /home/megaman/OS_seti`; @WIN=`egrep -i 'win' /home/megaman/OS_seti`; @UNIX=`egrep -i 'n?x' /home/megaman/OS_seti`; chomp @ALL; $uno = 0; $temp_UNIX = 0; $temp_WIN = 0; $temp_OTRO = 0; $total = 0; $cont_UNIX = 0; $cont_WIN = 0; $cont_OTRO = 0; while($ALL[$uno]){ $ALL[$uno] =~ /([.]*)[s][s]+([d]+)[s]+/; my $temp = $2; if( ($ALL[$uno] =~ /(([uUiI]n[iIuU]x)|([bB][sS][dD])|([iI][xX])|([sScC][a-zA-Z/][lLnN])|([hH][pP][uU][xX])|([sS][yY][sS])|([sS][cC][oO])|([Mm][uU][lL]))/ )){ $cont_UNIX++; $temp_UNIX = $temp_UNIX + $temp; } else{ if ( $ALL[$uno] =~ /[^rR][wW][iI][nN]/){ $cont_WIN++; $temp_WIN = $temp_WIN + $temp; } else{ $cont_OTRO++; $temp_OTRO=$temp_OTRO+$temp; } } $total = $total + $temp; $uno ++; } print "n>>> $temp_UNIX resultados para UNIX: $cont_UNIX sistemas operativos"; print "t",($temp_UNIX/$total)*100," %.n"; print ">>> $temp_WIN resultados para WINDOWS: $cont_WIN sistemas operativos"; print "t",($temp_WIN/$total)*100," %.n"; print ">>> $temp_OTRO resultados para otros: $cont_OTRO sistemas operativos"; print "t",($temp_OTRO/$total)*100," %.n"; print ">>> $total resultados.n"; </pre> PS: I'm by no means, good at Perl coding, or any language ('xcept assembly for microcontrollers...) for that matter... |
DecBassI Send message Joined: 21 May 05 Posts: 152 Credit: 86,905 RAC: 0 |
I dont know if you are being serious or taking the piss. If you are serious, then please ignore me. |
jrmm22 Send message Joined: 30 Jan 04 Posts: 353 Credit: 24,536,157 RAC: 0 |
I dont know if you are being serious or taking the piss. If you are serious, then please ignore me. Ok I've edited that part... |
TeraGram Send message Joined: 20 Jul 99 Posts: 187 Credit: 7,784,928 RAC: 0 |
What I do, when I have too much free time* is... ... look at my current WU total. ... look at my current RAC. Plop that into a spreadsheet. Look at current WU total and current RAC of... ... the person sitting at #1000 on http://setiathome.berkeley.edu/top_users.php?sort_by=total_credit ... the person sitting at #900 on http://setiathome.berkeley.edu/top_users.php?sort_by=total_credit ... the person sitting at #500 on http://setiathome.berkeley.edu/top_users.php?sort_by=total_credit ... the person sitting at #3 on http://setiathome.berkeley.edu/top_users.php?sort_by=total_credit and then calculate when I'll overtake any or all of them. - T. * - read that as "purposefully ignoring my housework". |
©2024 University of California
SETI@home and Astropulse are funded by grants from the National Science Foundation, NASA, and donations from SETI@home volunteers. AstroPulse is funded in part by the NSF through grant AST-0307956.