モック画像を大量に生成するPerlスクリプトを書きました
最近Perlの便利さに気づいて何か便利なものが作れないかと常日頃考えております。
今回は大量に画像データを生成するスクリプトを作ったので公開しておこうと思います。
画像を生成する上でplacehold.jpというサービスを最大限利用させていただきました。
処理の流れとしては受け取った引数に応じてplacehold.jpにGETリクエストを投げるとURLに応じて画像データが返ってくるので返ってきたバイナリをファイルに出力しています。
画像の生成自体はそれほど難しくはなかったですが、スクリプトのURLエンコードを日本語に対応させようとした時にちょっと躓きました。Windowsならcp932でデコードしてからUTF-8でエンコードし直す必要があります。
なお、このスクリプトは特にライブラリ等をインストールしなくとも使えるようになっています。
ちなみにPerlを使うならStrawBerry Perlがおすすめです。
続きを読むモック画像を大量に生成するPerlスクリプトを書きました
最近Perlの便利さに気づいて何か便利なものが作れないかと常日頃考えております。
今回は大量に画像データを生成するスクリプトを作ったので公開しておこうと思います。
画像を生成する上でplacehold.jpというサービスを最大限利用させていただきました。
処理の流れとしては受け取った引数に応じてplacehold.jpにGETリクエストを投げるとURLに応じて画像データが返ってくるので返ってきたバイナリをファイルに出力しています。
画像の生成自体はそれほど難しくはなかったですが、スクリプトのURLエンコードを日本語に対応させようとした時にちょっと躓きました。Windowsならcp932でデコードしてからUTF-8でエンコードし直す必要があります。
なお、このスクリプトは特にライブラリ等をインストールしなくとも使えるようになっています。
ちなみにPerlを使うならStrawBerry Perlがおすすめです。
続きを読む