I want to create an icon on the desktop for dragging and dropping files onto (for a wife friendly script essentially). I wrote a quick test to make sure it would work how I expected.
|
Source code
|
1
2
3
4
5
6
7
8
9
|
$file = "";
while (defined($file))
{
if ($file ne "")
{
print "ARGV = [$file]\n";
}
$file = shift (@ARGV);
}
|
When I ran it, instead of one window with four printed lines, I got four spawned windows with a single printed file.
I could jiggery pokery and make it work, but I'd rather find a way to do it more simply.
Is there a way to get all four files to go to the same script process? Barring that, is there a utility that will do something similar and then would kick off my script?