Skip to content

Instantly share code, notes, and snippets.

View alecchen's full-sized avatar

Alec Chen alecchen

View GitHub Profile
@alecchen
alecchen / doxygen_1.7.6.1_patch.diff
Created December 29, 2011 07:06
a patch for doxygen 1.7.6.1
--- doxygen-1.7.6.1/src/latexgen.cpp 2011-10-14 17:03:56.000000000 +0800
+++ doxygen-1.7.6.1_build/src/latexgen.cpp 2011-12-29 15:00:36.355207000 +0800
@@ -158,7 +158,7 @@
<< "pdf: refman.pdf" << endl << endl;
t << "refman.pdf: clean refman.tex" << endl;
t << "\tpdflatex refman" << endl;
- t << "\t" << mkidx_command << " refman.tex" << endl;
+ t << "\t" << mkidx_command << " refman.idx" << endl;
if (generateBib)
{
#!/usr/bin/perl
use Modern::Perl;
use Smart::Comments;
use WWW::Mechanize;
use Mojo::DOM;
use Readonly;
Readonly my $TOUR_URL => 'http://radiohead.com/tourdates/';
Readonly my $GIG_URL => 'http://radiohead.com/tourdates/25-07-12_taipei';

給卡卡的Windows空間不足建議

先刪掉不需要的檔案

jdiskreport 找出又大又不需要的檔案

看你要刪掉或拷貝到外接硬碟都可以

這裡有這個軟體的使用教學

People under time pressure don't work better; they Just work faster.

In order to work faster, they may have to sacrifice the quality of the product and their own job satisfaction.

print "hello\n";
#---------------------------------------------------------------------------
# Foo
#---------------------------------------------------------------------------
package Foo;
use Moose;
has 'name' => ( is => 'rw', isa => 'Str' );
sub hello {
foo('bar', 100)
sub foo {
# $first = 'bar'
my $first = shift;
my $first = shift @_;
my $first = $_[0];
my ($first) = @_;
# $first = 'bar', $second = 100;
#!/usr/bin/env perl
package Geometry::Primitive::Triangle;
use Moose;
use Geometry::Primitive::Point;
extends 'Geometry::Primitive::Polygon';
has 'origin' => (
is => 'rw',
use Test::More qw(no_plan);
use Test::Differences::Color;
eq_or_diff('same text', 'same text', 'test description');
my @array1 = qw(
foo
bar
);