Perlコーディング初心者質問スレ Part 56

Perlコーディング初心 ..

834:nobodyさん
08/01/30 18:43:24
use strict;use warnings;
use Win32::OLE;
my $sh = Win32::OLE->new('WScript.Shell');
print $sh->SpecialFolders("Desktop");

use strict;use warnings;
use Win32 qw/CSIDL_DESKTOP/;
print Win32::GetFolderPath( &CSIDL_DESKTOP );

次ページ