#!/usr/bin/env perl

=pod

TwitterPod.app ディレクトリがある階層に移動してから実行して下さい。

=cut

use strict;
use warnings;

system '/bin/cp', '-fr', 'TwitterPod.app', 'WassrPod.app';

# Info.plist
system '/bin/cp', '-fr', 'WassrPod.app/Contents/Info.plist', 'WassrPod.app/Contents/Info.plist.backup';
system '/bin/cat WassrPod.app/Contents/Info.plist.backup | /usr/bin/sed "s/http\:\/\/homepage.mac.com\/koh\/RSS\/twitterpod.xml/http\:\/\/svn.coderepos.org\/share\/lang\/perl\/misc\/WassrPod\/wassrpod.xml/" | /usr/bin/sed s/Twitter/Wassr/ | /usr/bin/sed s/twitter/wassr/ | /usr/bin/sed s/86400/864000/ | /usr/bin/sed s/1.7.19/0.0.1/ > WassrPod.app/Contents/Info.plist';

# execute file
system '/bin/cat WassrPod.app/Contents/MacOS/TwitterPod | /usr/bin/sed s/TwitterPod.sql/WassrerPod.sql/ > WassrPod.app/Contents/MacOS/WassrPod';
chmod 0755, 'WassrPod.app/Contents/MacOS/WassrPod';