> "PP" == Philip Potter writes:
PP> 2009/11/11 Uri Guttman :
>> you can also simplify the copy a little with a hash ref:
>>
>> my $readfsgs_flags = { map { $_ => $flags->{$_} } @flags_to_copy } ;
PP> Is this really simpler than my version?
PP> @readfsgs_fla...@flags_to_copy} =
2009/11/11 Uri Guttman :
>> "PP" == Philip Potter writes:
>
> PP> my %readfsgs_flags;
> PP> my @flags_to_copy = qw(limit); # can scale up by adding more hash
> keys here
> PP> @readfsgs_fla...@flags_to_copy} = @{$flag...@flags_to_copy};
> PP> my @results = readfsgs($testfi
> "PP" == Philip Potter writes:
PP> my %readfsgs_flags;
PP> my @flags_to_copy = qw(limit); # can scale up by adding more hash
keys here
PP> @readfsgs_fla...@flags_to_copy} = @{$flag...@flags_to_copy};
PP> my @results = readfsgs($testfilename, \%readfsgs_flags);
PP>