perlquestion
blackadder
Dear All,<br><br>
I ma trying to obtain the file/folder properties under win32 (the attributes such as hidden, readonly...etc). I have the following simple code
<code>
use Win32::File;
my $path = $ARGV[0];
if (Win32::File::GetAttributes($path, $attrib))
{
print $attrib, $/;
}
else
{
print "Error\n";
}
</code>
However, the output i get is just a number!<br><br>
Can some please enlighten me on how can I get the attribes in human readble form?
<br><br>
<!-- Node text goes above. Div tags should contain sig only -->
<div class="pmsig"><div class="pmsig-125553">
Blackadder
</div></div>