Re^3: Counting bytes in a Unicode document

Yes, -s is just another way to stat.

For example, one could write the following:

defined( my $s = -s $qfn )
   or die( "Can't stat `$qfn`: $!\n" );

... $s ...
[download]

But it could also be written as follows:

stat( $qfn )
   or die( "Can't stat `$qfn`: $!\n" );

... -s _ ...
[download]

defined( my $s = ( stat( $qfn ) )[ 7 ] )
   or die( "Can't stat `$qfn`: $!\n" );

... $s ...
[download]

Comment on Re^3: Counting bytes in a Unicode document Select or Download Code

Replies are listed 'Best First'.
Re^4: Counting bytes in a Unicode document by etj (Priest) on Oct 15, 2024 at 12:39 UTC
It's worth also mentioning the idiom of `stat $file; ... (stat(_))[7]` to use the result of the last `stat`.	[reply] [d/l] [select]
Re^5: Counting bytes in a Unicode document by ikegami (Patriarch) on Oct 15, 2024 at 15:38 UTC
If it's worth mentioning, it's as something to avoid. `-s _` is a million times more readable than `+(stat(_))[7]`.	[reply] [d/l] [select]
Re^6: Counting bytes in a Unicode document by etj (Priest) on Oct 23, 2024 at 08:55 UTC
The point, which regrettably you missed, wasn't the `(stat etc)[n]` idiom. It's the use of `_` as an argument to these operations to reuse the cached results of the last one.	[reply] [d/l] [select]
Re^7: Counting bytes in a Unicode document by ikegami (Patriarch) on Oct 23, 2024 at 10:04 UTC