Hello Monks,
This is an example script from a book. It is currently executed from a command line. I am having trouble understanding something. In line 7 the script reads my $out_dir = 'icons'; however in the command line call
perl make_thumbnail -dir thumb *.gif *.jpg ../*.tiff
they create a directory named "thumb". After executing the "thumb" directory has been created but what happens to the directory named "icons"? Is this in case the -dir parameter is empty it will use "icons" as a default.

How would one go about changing this script to be browser executable.

#!/usr/bin/perl -w

use strict;
use diagnostics;
use Image::Magick;
use Getopt::Long;
use File::Basename;

my $out_dir = 'icons';
my $geometry= '120x120';

GetOptions(
'geometry=s'  => \$geometry,
'directory=s' => \$out_dir,
);

mkdir $out_dir, 0777 or die "Cannot create $out_dir: $!" unless -d $ou
+t_dir;

foreach my $img (@ARGV)
{
   my $rc;
   my $im = Image::Magick->new();
   $rc = $im->Read($img);
   warn($rc), next if $rc;
   my $basename = basename $img;
   $basename =~ s/\.\w+$//;
   $rc = $im->Write("PNG:$out_dir/$basename.png");
   warn($rc) if $rc;
   }
[download]