in reply to Filling a File with While

There is far too little context for us to help except that 8205 is sorta close to twice 4110. Could it be that $tsize is in characters, $size is in bytes and the file is unicode?

Perl reduces RSI - it saves typing

Replies are listed 'Best First'.
Re^2: Filling a File with While
by koaps (Novice) on Nov 05, 2008 at 23:29 UTC
    The file is created using the File::System::Object, $tsize is from the File::System::Object get_property('size') and $size is a scalar number.

    $l and $v are File::System::Objects, in this case $l is a lookup and $v is hash value that stored the lookup object. 
    my $size = 1000;
my $tsize = $v->get_property('size');
my $f = $l->create("$file",'f');

    [download]

    If that helps clear up anything
[reply]
[d/l]

In Section Seekers of Perl Wisdom