Bash script and perl script to take screenshots online

This perl script was a little bit modified be me, to be used with freeimagehosting, because with with imageshack stopped working :(

I made this script to use with key combinations to select when i want to post an screenshot online or not. (Note: you must change the perl script path...)

To post the screenshot online and automatically open with Firefox
sh send.sh 0
To just only save the
sh send.sh 1

#!/bin/bash
filename=`date +%y%m%d%H%M%S`.png

mkdir /tmp/screens;
file=/tmp/screens/$filename
import $file -quality 100;

if [ $1 == 0 ];

 then
  firefox $( perl freeimagehosting.pl $file ) &
 fi