Categories
Company
Local Language
Forums
Discussions
Forums
- Data Protection and Retention
- Entry Storage Systems
- Legacy
- Midrange and Enterprise Storage
- Storage Networking
- HPE Nimble Storage
Discussions
Forums
Discussions
Discussions
Discussions
Forums
Discussions
Discussion Boards
Discussion Boards
Discussion Boards
Discussion Boards
- BladeSystem Infrastructure and Application Solutions
- Appliance Servers
- Alpha Servers
- BackOffice Products
- Internet Products
- HPE 9000 and HPE e3000 Servers
- Networking
- Netservers
- Secure OS Software for Linux
- Server Management (Insight Manager 7)
- Windows Server 2003
- Operating System - Tru64 Unix
- ProLiant Deployment and Provisioning
- Linux-Based Community / Regional
- Microsoft System Center Integration
Discussion Boards
Discussion Boards
Discussion Boards
Discussion Boards
Discussion Boards
Discussion Boards
Discussion Boards
Discussion Boards
Discussion Boards
Discussion Boards
Discussion Boards
Discussion Boards
Discussion Boards
Discussion Boards
Discussion Boards
Discussion Boards
Discussion Boards
Discussion Boards
Discussion Boards
Discussion Boards
Community
Resources
Forums
Blogs
- Subscribe to RSS Feed
- Mark Topic as New
- Mark Topic as Read
- Float this Topic for Current User
- Bookmark
- Subscribe
- Printer Friendly Page
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report Inappropriate Content
04-28-2003 07:56 AM
04-28-2003 07:56 AM
error
I am not sure what is missing, it is giving error when I run it.
#!/usr/bin/perl -w
use File::Find;
open F,"my $size = (lstat(F))[7];
print $size;
$ ./test29.pl
lstat() on filehandle F at ./test29.pl line 4.
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report Inappropriate Content
04-28-2003 08:21 AM
04-28-2003 08:21 AM
Re: error
Eugeny
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report Inappropriate Content
04-28-2003 08:21 AM
04-28-2003 08:21 AM
Re: error
I cut and pasted your script onto my test box, created a small /tmp/file1.lck file for it to use, and I was able to run your script just fine. My box has Perl 5.6.0 on it. What version of Perl are you running? Also, what kind of file is /tmp/file1.lck?
JP
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report Inappropriate Content
04-28-2003 08:34 AM
04-28-2003 08:34 AM
Re: error
$ perl -d test29.pl
In the
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report Inappropriate Content
04-28-2003 02:16 PM
04-28-2003 02:16 PM
Re: error
One one host, I get the following:
qe2n1:/home/bdouglas> perl -w test.pl
0
qe2n1:/home/bdouglas> perl -v
This is perl, v5.6.1 built for PA-RISC1.1-thread-multi
(with 1 registered patch, see perl -V for more detail)
Copyright 1987-2001, Larry Wall
Binary build 633 provided by ActiveState Corp. http://www.ActiveState.com
Built 21:04:57 Jun 17 2002
On another machine:
qe2l1:/home/bdouglas> perl -w test.pl
lstat() on filehandle F at test.pl line 5.
86
qe2l1:/home/bdouglas>
qe2l1:/home/bdouglas> perl -v
This is perl, v5.8.0 built for PA-RISC2.0