gaurav

#!/usr/bin/perl                                                                 

use strict;                                                                     
use warnings;                                                                   

my $NewUsage = 150;                                                             
my %Usage = ();                                                                 

foreach my $mac ('ABC', 'DEF', 'ABC', 'DEF', 'GHI') {                           
    $Usage{$mac} = $Usage{$mac} // 0;                                           

gaurav

# started 2014-03-24T23:34:27Z
<http://commons.dbpedia.org/resource/File:Cramer&Stoll-uitlandsche_kapellen_vol._1-_-Frontispiece_2.jpg> <http://purl.org/dc/terms/subject> <http://commons.dbpedia.org/resource/Category:Cramer_and_Stoll:De_uitlandsche_kapellen> .
<http://commons.dbpedia.org/resource/File:Cemophora_coccineaHolbrookV3P30A.jpg> <http://purl.org/dc/terms/subject> <http://commons.dbpedia.org/resource/Category:Cemophora_coccinea> .
<http://commons.dbpedia.org/resource/File:Cemophora_coccineaHolbrookV3P30A.jpg> <http://purl.org/dc/terms/subject> <http://commons.dbpedia.org/resource/Category:North_American_Herpetology_(Holbrook)> .
<http://commons.dbpedia.org/resource/File:Cemophora_coccineaHolbrookV3P30A.jpg> <http://purl.org/dc/terms/subject> <http://commons.dbpedia.org/resource/Category:PD_art_uploaded_by_Patrick_Coin> .
<http://commons.dbpedia.org/resource/File:Dryandra_armata_(Curtis's_Botanical_Magazine_Plate_3236).jpg> <http://purl.org/dc/terms/subject> <http://commons.dbpedia.org/resource/Catego

gaurav

University of Alaska Museum Bird Collection (UAM), University of Alaska Fairbanks
University of Wyoming Museum of Vertebrates
Denver Museum of Nature & Science Bird Collection
Division of Birds, Museum of Southwestern Biology (MSB), University of New Mexico, Albuquerque
Estonian Nature Observations Database, Estonian Nature Observations Database
Moore Laboratory of Zoology (MLZ)
Museum of Comparative Zoology, Harvard University: Museum of Comparative Zoology, Harvard University
UMMZ Bird Collection
ArtDatabanken: Artdata
Royal Ontario Museum: Ornithology Collection Non Passeriformes - Royal Ontario Museum

gaurav

<http://commons.dbpedia.org/resource/File:Buta-1,3-diene_200.svg> <http://purl.org/dc/terms/created> "2014-02-22"^^<http://www.w3.org/2001/XMLSchema#date> .
<http://commons.dbpedia.org/resource/File:Buta-1,3-diene_200.svg__https://upload.wikimedia.org/wikipedia/commons/8/8__1> <http://dbpedia.org/ontology/inchi> "InChI=1S/C4H6/c1-3-4-2/h3-4H,1-2H2;"^^<http://www.w3.org/2001/XMLSchema#string> .
<http://commons.dbpedia.org/resource/File:Buta-1,3-diene_200.svg__https://upload.wikimedia.org/wikipedia/commons/8/8__1> <http://purl.org/dc/terms/references> <http://www.nlm.nih.gov/cgi/mesh/2014/MB_cgi?term=106-99-0&rn=1&rr=1> .
<http://commons.dbpedia.org/resource/File:Buta-1,3-diene_200.svg__https://upload.wikimedia.org/wikipedia/commons/8/8__1> <http://purl.org/dc/terms/references> <http://esis.jrc.ec.europa.eu/lib/esis_reponse.php?GENRE=ECNO&ENTREE=203-450-8&PGM=esi&FROM=FORMULAIRE&CPT_DEB=1> .
<http://commons.dbpedia.org/resource/File:Buta-1,3-diene_200.svg> <http://dbpedia.org/ontology/license> <http://creativec

gaurav

brew install qt
brew install sip

[download PyQT from http://www.riverbankcomputing.com/software/pyqt/download and unzip]
/usr/local/bin/python configure-ng.py
make
make install

gaurav

If Scandinavia was a family, Sweden'd be the obnoxiously anxious hipster older brother.
Denmark would be the hippie sister, smoking weed on her room while googling "dolphin telepathy". 
She'd have a penchant for "funny" hats.
Norway would be the chipper healthy brother who's always out on some outdoor activity. He use the 
mixer to do "nutritious" kale shakes.
Finland would be the alcoholic, solopsist brother whom nobody in the family really understand. He 
collects knives.
Iceland would be the illegitimate sibling whom nobody ever talks about since he seems bat shit crazy.
Oh, I forgot Åland. She's the only genuinely healthy person in the family. She's boring, 
conventionally pretty and likes to travel.

gaurav

gaurav

perl -ne 'lc; $total = length; s/[^l]//g; print "Total: $total\tLs: " . length($_) . "\n";'

gaurav

# A one-liner to ensure that $seconds_since_the_hour % $NO will distribute equally.
perl -Mstrict -e 'my $NO = 6; my @a = (); push @a, int rand(60)  for(1 .. 1_000); my %b = (); $b{$_ % $NO}++ for(@a); print "$_ => $b{$_}\n" for sort { $a <=> $b } keys %b;'

gaurav

--- perldoc-server.original	2009-09-04 14:23:55.000000000 +0800
+++ perldoc-server	2009-09-04 14:35:57.000000000 +0800
@@ -31,6 +31,7 @@
 GetOptions(\%options,
   'perl=s',
   'port=i',
+  'search|l=s@',
   'public',
   'help|h|?' => sub{pod2usage(1)},
 );