######################
# itms へのリンク
# usage: {{itms('app_name','software_id')}}
sub itms {
    my ($app,$id) = @_;
    my $prefix = q(itms://itunes.apple.com/WebObjects/MZStore.woa/wa/viewSoftware?id=);
    return qq(<a href="$prefix$id">$app</a>);
}

### Google Mapsの埋め込み
# usage: {{embed_google_maps('住所 (店名など)')}}
sub embed_google_maps {
  my ($str) = @_;
  my $prefix = q(http://maps.google.co.jp/maps?q=);
  my $enc = URI::Escape::uri_escape(Jcode->new($str)->utf8);
  my $width = 600;
  my $height = 400;
  return qq(<iframe width="$width" height="$height" frameborder="0" scrolling="no" marginheight="0" marginwidth="0" src="$prefix$enc&amp;output=embed"></iframe>);
}

sub embed_maps {embed_google_maps(@_)}