This module allows you to create and manipulate Windows shortcut files (.lnk files) through Perl. The methods and properties of this module apply to shortcut objects created by new:
use Win32::Shortcut; $link = Win32::Shortcut->new( );
This creates the shortcut object $link, on which you can set properties and save into a file. If you supply a filename as an argument to new, the file will be loaded into the shortcut object.
The object can also be accessed as if it was a normal hash reference. The following properties (hash keys) are available:
$link->{'File'} $link->{'Path'} $link->{'ShortPath'} $link->{'WorkingDirectory'} $link->{'Arguments'} $link->{'Description'} $link->{'ShowCmd'} $link->{'Hotkey'} $link->{'IconLocation'} $link->{'IconNumber'}
See Section 22.18.1, "Shortcut Properties" for a description of each property.
The following example assumes you have a shortcut file named test.lnk in your current directory. This simple script will tell you where this shortcut points to:
use Win32::Shortcut; $link=new Win32::Shortcut( ); $link->Load("test.lnk"); print "Shortcut to: $link->{'Path'} $link->{'Arguments'} \n"; $link->Close( );
But you can also modify its values:
use Win32::Shortcut; $link=new Win32::Shortcut( ); $link->Load("test.lnk"); $link->{'Path'}=~s/C:/D:/i; # Move the target from C: to D: $link->{'ShowCmd'}=SW_NORMAL; # Runs in a normal window
The methods provided by Win32::Shortcut are as follows.
new |
new Win32::Shortcut [file]
Creates a new shortcut object. If a filename is passed in file, automatically Load s this file also. Returns the object created, or undef on error.
Close |
$link->Close( )
Closes a shortcut object. It is not strictly required to close the objects you created, since the Win32::Shortcut objects are automatically closed when the program ends (or when you otherwise destroy such an object).
Load |
$link->Load(file)
Loads the content of the shortcut file named file in a shortcut object and fills the properties of the object with its values. Returns undef on error, or true if everything was successful.
Resolve |
$link->Resolve([flag])
Attempts to automatically resolve a shortcut and returns the resolved path, or undef on error; if there is no resolution, the path is returned unchanged. Note that the path is automatically updated in the Path property of the shortcut.
# If the target doesn't exist... if(! -f $link->Path) { # Save the actual target for comparison $oldpath = $link->Path; # Try to resolve it (with dialog box) $newpath = $link->Resolve(0); die "Not resolved..." if $newpath == $oldpath; }
Save |
$link->Save([file])
Saves the content of the shortcut object into the file named file. If file is omitted, the filename is taken from the File property of the object (which, if not changed, is the name of the last Load ed file).
Set |
$link->Set(path, arguments, workingdirectory, description, showcmd, hotkey, iconlocation, iconnumber) |
Sets all the properties of the shortcut object with a single command. This method is supplied for convenience only; you can also set these values by changing the values of the properties. For example:
$link->Set("C:\PERL5\BIN\PERL.EXE", "-v", "C:\PERL5\BIN", "Prints out the version of Perl", SW_SHOWMAXIMIZED, hex('0x0337'), "C:\WINDOWS\SYSTEM\COOL.DLL", 1);
$link->Path("C:\PERL5\BIN\PERL.EXE"); $link->Arguments("-v"); $link->WorkingDirectory("C:\PERL5\BIN"); $link->Description("Prints out the version of Perl"); $link->ShowCmd(SW_SHOWMAXIMIZED); $link->Hotkey(hex('0x0337')); $link->IconLocation("C:\WINDOWS\SYSTEM\COOL.DLL"); $link->IconNumber(1);</PRE>
The properties of a shortcut object can be accessed as:
$link->{'property'}
For example, assuming that you have created a shortcut object with:
$link=new Win32::Shortcut( );
you can see its description with:
print $link->{'Description'};
You can, of course, also set it like this:
$link->{'Description'}="This is a description";
The shortcut properties also have corresponding methods that can also set or read their values.
The properties of a shortcut reflect the content of the Shortcut Properties dialog box, which can be obtained by right-clicking on a shortcut file in the Windows 95 (or NT 4.0) Explorer and choosing "Properties." Shortcut properties are:
Value |
Meaning |
Constant |
---|---|---|
1 |
Normal window |
SW_SHOWNORMAL |
3 |
Maximized |
SW_SHOWMAXIMIZED |
7 |
Minimized |
SW_SHOWMINNOACTIVE |
Copyright © 2002 O'Reilly & Associates. All rights reserved.