Skip to content

Instantly share code, notes, and snippets.

sub insert_post {
my ($class, $c, $parameters) = @_;
my $post_data = {
$class->data_from_parameters($parameters),
published => \'now()',
created => \'now()',
modified => \'now()',
};
package Asayake::Web::FormValidator::Post;
use strict;
use warnings;
use FormValidator::Lite;
my %post_validate_rule = (
user_id => [qw/NOT_NULL/],
blog_id => [qw/NOT_NULL/],
発送いたしました商品は以下のとおりです。
---------------------------------------------------------------------
数量 商品 価格 発送済み 小計
---------------------------------------------------------------------
1 Keep The Beats! ¥ 2,810 1 ¥ 2,810
1 TVアニメ「Angel Beats!」オリ ¥ 3,293 1 ¥ 3,293
2 一番の宝物~Yui final ver.~(DV ¥ 1,646 2 ¥ 3,292
---------------------------------------------------------------------
<html>
<head>
<script type="text/javascript" src="https://ajax.googleapis.com/ajax/libs/jquery/1.6.3/jquery.min.js"></script>
<!--script type="text/javascript" src="https://raw.github.com/gist/1205897/jquery.postize.js"></script-->
<!--script type="text/javascript" src="https://raw.github.com/gist/1202682/harukaze.js"></script-->
<script type="text/javascript" src="harukaze.js"></script>
</head>
<a href="http://example.com/?created_at=2011-01-01" data-user_id="1">test</a>
<script type="text/javascript">
jQuery.fn.postize = function (option) {
var buildData = function (query) {
var queries = query.split(/&/);
var result = {};
for (var i = 0, l = queries.length; i < l; i++) {
var pieces = queries[i].split(/=/, 2);
var name = decodeURIComponent(pieces[0])
var value = decodeURIComponent(pieces[1]);
value = value ? !isNaN(value) ? Number(value) : value : '' ;
result[name] = value;
(function (ns, w, d, $) {
var harukaze = ns.harukaze = {};
harukaze.util = {
isElement: function (object) {
return object && object.nodeType && object.nodeType == 1;
},
<html>
<head>
<meta charset="UTF-8">
<style type="text/css">
#sub {
margin: 20px;
}
.inner-content {
package Asayake::Web::Dispatcher;
use strict;
use warnings;
use Asayake::DB;
use Amon2::Web::Dispatcher::RouterSimple;
use Scalar::Util;
{
@aerith
aerith / access_token.pl
Created August 17, 2011 05:55
instagr.am の API を利用するためのアクセストークンを取得して表示するスクリプト。JSON そのまま出力してるだけ。
#!/usr/bin/perl
use strict;
use warnings;
use Config::Pit;
use URI;
use URI::QueryParam;
use URI::Escape;
use LWP::UserAgent;
駄目人間( http://twitter.com/rokudenashi )
宇宙戦艦ヤマト
上を向いて歩こう
Magia
射手座☆午後九時Don't be late
アイモ〜鳥のひと
NA NA IRO
残酷な天使のテーゼ
創聖のアクエリオン