perl - JPEG判定をPure Perlで : 404 Blog Not Found
2009年08月18日13:45 カテゴリLightweight Languages perl - JPEG判定をPure Perlで やってみてもいいと思ったので。 JPEG かどうかを判断する C のコード - TokuLog 改めB日記 こんな感じで。 #!/usr/bin/perl use strict; use warnings; use LWP::Simple; my $url = 'http://ec2.images-amazon.com/images/P/4757215339.01.MZZZZZZZ.jpg'; my $content = get($url) or die "Couldn't get $url"; print "$url : ", isjpeg(\$content); if (0){ # test my $fn = shift; my $content; p
tokuhirom blog
Blog Search when-present<#else>when-missing. (These only cover the last step of the expression; to cover the whole expression, use parenthesis: (myOptionalVar.foo)!myDefault, (myOptionalVar.foo)?? ---- ---- FTL stack trace ("~" means nesting-related): - Failed at: ${entry.path} [in template "__entry.ftlh" at line 3, column 25] - Reached through: #include "__entry.ftlh" [in template "entry.ftlh" at
1
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
処理を実行中です
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く
