Skip to content

Instantly share code, notes, and snippets.

View aanoaa's full-sized avatar
💭
💩 💩 💩

Hyungsuk Hong aanoaa

💭
💩 💩 💩
View GitHub Profile
oops
## role, priv and scope ##
- role: 역할
- priv: 권한
- scope: 범위
`staff` 는 `사용자정보열람` 이 가능하다.
`aanoaa` 는 `staff` 이다.
`aanoaa` 는 `사용자정보열람` 을 할 수 있다.
@aanoaa
aanoaa / google-calendar.pl
Created July 29, 2015 09:26
google calendar quickAdd
use strict;
use warnings;
use Crypt::OpenSSL::RSA ();
use HTTP::Tiny;
use JSON;
use MIME::Base64 'encode_base64url';
use Path::Tiny;
sub encode_jwt {

NAME

wmaker on Ubuntu-Server 9.10

install package list & sequence

sudo apt-get install

sound_effect.loadJavascript('strastar.js'); // 사이즈별 이슈를 없애기 위해..
component='startWnd';
readXML('contents.xml'); // config file
var tmp=[handset_type(), g_contents['index_bg'][0], 'jpg'];
eval(component).bgImage=tmp.join('.'); // WQVGA.bg.jpg
var remainder_height=SCREEN_H; // 400
var remainder_width=SCREEN_W; // 320
var g_fart_seq=1;
var MAX_FART_SEQ=3;
#!/usr/bin/env perl
use strict;
use warnings;
use XML::Simple;
use Data::Dump qw/dump/;
my $config = XMLin('style.xml');
my $style={};
foreach my $key (keys %{$config->{style}}) {
my @names = split /\./, $key;
diff --git a/ibp b/ibp
old mode 100644
new mode 100755
index 99a99ca..22b7ae5
--- a/ibp
+++ b/ibp
@@ -120,6 +120,13 @@ sub install {
File::Path::mkpath($name, 0, 0777);
system("unzip -q bp.zip -d ".$name);
system('rm -rf bp.zip');
diff --git a/gistp b/gistp
index acea51a..454b47e 100755
--- a/gistp
+++ b/gistp
@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
use strict;
use warnings;
use 5.008001;
"==================================
set ruler
set nobackup
set nu
set tabstop=4
"colorscheme pablo
colorscheme desert256
"==================================
map <F1> v]} zf
map <F2> zo