Skip to content

Instantly share code, notes, and snippets.

View gslin's full-sized avatar

Gea-Suan Lin gslin

View GitHub Profile
* A1: 24 of 24 PoPs online
o ams-lv3 (Europe :: Netherlands :: Amsterdam :: 1 :: LVL3)
o arn-tel (Europe :: Sweden :: Stockholm :: 1 :: Telia)
o cdg-agg (Europe :: France :: Paris :: 1 :: SECR)
o fra-ti2 (Europe :: Germany :: Frankfurt :: 2 Tiscali (Nacamar))
o lhr-agg (Europe :: UK :: London :: 1 :: Telia)
o mil-ti2 (Europe :: Italy :: Milan :: 1 :: Tiscali)
o bog-ag1 (Latin America :: Colombia :: Bogota :: 1 :: UNE)
o doh-agg (MEA :: Qatar :: Doha :: 1 :: QT)
o hkg-agg (South/Southeast Asia :: China :: Hong Kong :: 1 :: Pacnet (MegaI))
|-+= 94029 root /usr/local/bin/screen
| |-+= 61688 gslin /bin/tcsh
| | \-+= 59279 root sudo portmaster -BDtw py26-fabric-0.9.1,1 rubygem-activesupport-3.0.0 rubygem-addressable-2.2.1 rubygem-webmock-1.3.5 po4a-0.39 p5-MooseX-ClassAttribute-0.16
| | \-+- 03871 root /bin/sh /usr/local/sbin/portmaster -BDtw py26-fabric-0.9.1,1 rubygem-activesupport-3.0.0 rubygem-addressable-2.2.1 rubygem-webmock-1.3.5 po4a-0.39 p5-MooseX
| | \-+- 73361 root /bin/sh /usr/local/sbin/portmaster -w -t -D -B py26-fabric-0.9.1,1
| | \-+- 18875 root /usr/bin/make -DNO_DEPENDS install
| | \--- 43924 root /bin/mkdir -p /usr/local/lib/python2.6/site-packages
gslin@colo-p [~/work] [15:50/W3] time gzip -9 -c perl-5.12.2.tar > perl-5.12.2.tar.gz
11.667u 0.075s 0:11.74 99.9% 37+1111k 0+116io 0pf+0w
gslin@colo-p [~/work] [15:50/W3] time bzip2 -9 -c perl-5.12.2.tar > perl-5.12.2.tar.bz2
9.410u 0.075s 0:09.48 100.0% 31+1114k 0+95io 0pf+0w
gslin@colo-p [~/work] [15:51/W3] time xz -9 -c perl-5.12.2.tar > perl-5.12.2.tar.xz
49.561u 0.540s 0:50.14 99.9% 47+1102k 2+71io 0pf+0w
gslin@colo-p [~/work] [15:54/W3] time plzip -9 -c perl-5.12.2.tar > perl-5.12.2.tar.plzip
64.692u 0.729s 1:05.56 99.7% 143+1005k 0+72io 0pf+0w
gslin@colo-p [~/work] [15:52/W3] d perl*
-rw-r--r-- 1 gslin staff 65300480 Sep 7 09:43 perl-5.12.2.tar
-rw-r--r-- 1 gslin staff 65300480 Sep 7 09:43 perl-5.12.2.tar
-rw-r--r-- 1 gslin staff 12348985 Oct 30 15:51 perl-5.12.2.tar.bz2-9
-rw-r--r-- 1 gslin staff 15104675 Oct 30 15:50 perl-5.12.2.tar.gz-9
-rw-r--r-- 1 gslin staff 9446272 Oct 30 15:55 perl-5.12.2.tar.plzip-9
-rw-r--r-- 1 gslin staff 13595652 Oct 30 15:58 perl-5.12.2.tar.xz-1
-rw-r--r-- 1 gslin staff 12446448 Oct 30 15:58 perl-5.12.2.tar.xz-2
-rw-r--r-- 1 gslin staff 10742448 Oct 30 16:02 perl-5.12.2.tar.xz-3
-rw-r--r-- 1 gslin staff 10344416 Oct 30 16:00 perl-5.12.2.tar.xz-4
-rw-r--r-- 1 gslin staff 10104908 Oct 30 16:01 perl-5.12.2.tar.xz-5
-rw-r--r-- 1 gslin staff 9756152 Oct 30 16:03 perl-5.12.2.tar.xz-6
#!/usr/bin/perl
use 5.010;
use pQuery;
my $htmlRaw = '<a href="http://www.perl.org/">test</a>';
my $html = pQuery($htmlRaw);
say $html->find('a')->toHtml;
gslin@aqua [/var/db/pkg] [13:59/W2] sudo portmaster -BDtw pix-basicSoftware-1.37
===>>> Currently installed version: pix-basicSoftware-1.37
===>>> Port directory: /usr/ports/pix/basicSoftware
===>>> Gathering dependency list for pix/basicSoftware from ports
===>>> Launching child to install /usr/ports
pix-basicSoftware-1.37 >> /usr/ports
===>>> No valid installed port, or port directory given
package JobQueue;
use strict;
use warnings;
sub get
{
my $self = shift;
shift @{$self->{jqa}};
}
#!/usr/bin/perl
use AnyEvent::HTTP;
use EV;
use JSON;
use strict;
use warnings;
use constant APIBASE => 'http://emma.pixnet.cc';
@gslin
gslin / gist:730691
Created December 6, 2010 18:26
iwiki.pl
#!/usr/bin/perl
use 5.010;
use WWW::Wikipedia;
use strict;
use warnings;
main();
sub main {
#!/usr/bin/perl
use parent qw/Tatsumaki::Handler/;
use strict;
use warnings;
sub get {
my $self = shift;
$self->write('It is Main Controller.');
}