----- Original Message ----- 
From: <[EMAIL PROTECTED]>
To: <[email protected]>
Sent: Thursday, July 21, 2005 4:23 PM
Subject: Find File from a File-Link


> Hi,
>
> does someone know if it is possible to
> read a link-to-a-file ("Verknüpfung" in german)
> and find out where the real file is located to open
> it?
>

use Win32::Shortcut;
use warnings;
use strict;

# Create the new link
my $link = new Win32::Shortcut();

# Nominate the shortcut file
my $shortcut_file = './country.plx.lnk';

# Load the shortcut file into the link
$link->Load($shortcut_file) or print "Shortcut not found!";

# Print the full path of the actual (target) file
print $link->Path(), "\n";

__END__

There doesn't seem to be any POD documentation for this module - but you
should have html documentation for it if it's installed. (It's part of
libwin.)

Cheers,
Rob

_______________________________________________
Perl-Win32-Users mailing list
[email protected]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs

Reply via email to