go 2.set LVM in VM
set new partition
alert('hoge') |
use strict; | |
use warnings; | |
use 5.010; | |
my @array = (10,8,2,2); | |
while( my ($i, $e) = each @array){ | |
say "i: $i, e: $e"; | |
} |
// 休日のjsonを返す | |
// this gas return json that all holidays in this month | |
// or reutrn specific range of holidays if keys esisted. eg http://<script_url>?start_date=2016-04-10&end_date=2016-05-11 | |
function doGet(e) { | |
var today = new Date(); | |
// キーの取得 | |
var param_start_date = e.parameter.start_date; | |
var param_end_date = e.parameter.end_date; | |
var output = {}; |
use strict; | |
use warnings; | |
use feature 'say'; | |
use Mojo::DOM; | |
use Mojo::UserAgent; | |
use Data::Dumper; | |
use Encode; | |
my $ua = Mojo::UserAgent->new; |
#!/usr/bin/env perl | |
use strict; | |
use warnings; | |
use 5.010; | |
use Data::Dumper; | |
use Mojo::UserAgent; | |
use Mojo::JSON('decode_json'); | |
use utf8; | |
use Encode qw(encode); |
use strict; | |
use warnings; | |
use 5.010; | |
use Data::Dumper; | |
use Mojo::UserAgent; | |
use Mojo::JSON('decode_json'); | |
my $conf = { | |
host=>'localhost', | |
user=>'admin', |