Dermot writes:
First, thanks for you helpful input and examples.
I'm taxing peoples patience I suppose but being considerably thick of
skull I cannot just look at this and see what it does.
> my @files = map { $_->[0] }
>sort { $a cmp $b }
>map {[$_, (sta
Hi,
I talked to Shlomi Fish quite some time back about using Hebrew and a
perl gui. The question was/is which gui? I seem to recall that gtk+
was about the only option that could do Hebrew properly. Is this
correct, or is my memory soaked from the recent flooding?
Dale/El'ad
--
To unsu
On Fri, Jan 9, 2015 at 10:31 AM, Brandon McCaig wrote:
> Charles:
>
> On Fri, Jan 9, 2015 at 12:46 PM, Charles DeRykus wrote:
>> On Fri, Jan 9, 2015 at 3:39 AM, Dermot wrote:
>>> I think John has answered your immediate question.
>>>
>>> ...
>>> for (0..$#files) {
>>> print "$_) $files[$_]\n
Charles:
On Fri, Jan 9, 2015 at 12:46 PM, Charles DeRykus wrote:
> On Fri, Jan 9, 2015 at 3:39 AM, Dermot wrote:
>> I think John has answered your immediate question.
>>
>> ...
>> for (0..$#files) {
>> print "$_) $files[$_]\n";
>> }
>>
>
> Alternatively (at least since 5.14) :
>
>
> say "$k)
On Fri, Jan 9, 2015 at 3:39 AM, Dermot wrote:
> I think John has answered your immediate question.
>
> ...
> for (0..$#files) {
> print "$_) $files[$_]\n";
> }
>
Alternatively (at least since 5.14) :
say "$k) $v" while ($k,$v) = each @files;
--
Charles DeRykus
--
To unsubscribe, e-mail:
I think John has answered your immediate question.
If you want to get the files back in a particular order you should include
a sort between and grep readdir. An example might be
my @files = sort { $a cmp $b }
grep { ! /^\./ && -f "$dir/$_" } readdir($dh);
for (0..$#files) {
