ASPN ActiveState Programmer Network
ActiveState
/ Home / Perl / PHP / Python / Tcl / XSLT /
/ Safari / My ASPN /
Cookbooks | Documentation | Mailing Lists | Modules | News Feeds | Products | User Groups


Recent Messages
List Archives
About the List
List Leaders
Subscription Options

View Subscriptions
Help

View by Topic
ActiveState
.NET Framework
Open Source
Perl
PHP
Python
Tcl
Web Services
XML & XSLT

View by Category
Database
General
SOAP
System Administration
Tools
User Interfaces
Web Programming
XML Programming


MyASPN >> Mail Archive >> perl-win32-users
perl-win32-users
Re: drag'n'drop onto desktop icon ???
by $Bill Luebkert other posts by this author
May 23 2005 12:29AM messages near this date
view in the new Beta List Site
RE: drag'n'drop onto desktop icon ??? | need help with utf8
Michael D Schleif wrote:

>  I have a perl program that successfully processes a set of text files.
>  So far, the UI is to pass the incoming text file to the program on the
>  command line.
>  
>  Users want an icon on their desktops, and they want to drag the text
>  file onto this icon, in order to process the file.
>  
>  I have not been able to figure out how to do this.
>  
>  What do you think?

Have you tried creating a shortcut to Perl and renaming it to the
name of the Perl script and add the path to the perl script as an
arg ?

Set Properties-> Shortcut->Target to something like :

C:\Perl\bin\perl.exe C:\Home\Me\test.pl         (adjust the arg to point to your script)

And test.pl:

use strict;
use Win32;

my $msg = '';
$msg .= "$_\n" foreach @ARGV;
Win32::MsgBox($msg);	# print args in MsgBox

__END__

-- 
  ,-/-  __      _  _         $Bill Luebkert    Mailto:dbecoll@[...].net
 (_/   /  )    // //       DBE Collectibles    Mailto:dbe@[...].com
  / ) /--<  o // //      Castle of Medieval Myth & Magic http://www.todbe.com/
-/-' /___/_<_</_</_    http://dbecoll.tripod.com/ (My Perl/Lakers stuff)
_______________________________________________
Perl-Win32-Users mailing list
Perl-Win32-Users@[...].com
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
Thread:
Michael D Schleif
Jack D.
$Bill Luebkert

Privacy Policy | Email Opt-out | Feedback | Syndication
© 2004 ActiveState, a division of Sophos All rights reserved