Aion-Fs
4 results

 view release on metacpan or  search on metacpan

README.md  view on Meta::CPAN 

654
655
656
657
658
659
660
661
662
663
664
665
666
667
668
669
670
671
672
673
674
```
 
Файл lib/N.pm:
```perl
package N;
sub ex { 123 }
1;
```
 
```perl
use lib "lib";
include("A")->new               # ~> A=HASH\(0x\w+\)
[map include, qw/A N/]          # --> [qw/A N/]
{ local $_="N"; include->ex }   # -> 123
```
 
## catonce (;$file)
 
Считывает файл в первый раз. Любая последующая попытка считать этот файл возвращает `undef`. Используется для вставки модулей js и css в резулÑ...
 
* `$file` может содержать массивы из двух элементов. Первый рассматривается как путь, а второй — как слой. Слой по умолчанию — `:utf8`.

lib/Aion/Fs.md  view on Meta::CPAN 

654
655
656
657
658
659
660
661
662
663
664
665
666
667
668
669
670
671
672
673
674
```
 
Файл lib/N.pm:
```perl
package N;
sub ex { 123 }
1;
```
 
```perl
use lib "lib";
include("A")->new               # ~> A=HASH\(0x\w+\)
[map include, qw/A N/]          # --> [qw/A N/]
{ local $_="N"; include->ex }   # -> 123
```
 
## catonce (;$file)
 
Считывает файл в первый раз. Любая последующая попытка считать этот файл возвращает `undef`. Используется для вставки модулей js и css в резулÑ...
 
* `$file` может содержать массивы из двух элементов. Первый рассматривается как путь, а второй — как слой. Слой по умолчанию — `:utf8`.

lib/Aion/Fs.pm  view on Meta::CPAN 

1509
1510
1511
1512
1513
1514
1515
1516
1517
1518
1519
1520
1521
1522
1523
1524
1525
1526
1527
1528
        1;
 
Файл lib/N.pm:
 
        package N;
        sub ex { 123 }
        1;
 
 
 
        use lib "lib";
        include("A")->new               # ~> A=HASH\(0x\w+\)
        [map include, qw/A N/]          # --> [qw/A N/]
        { local $_="N"; include->ex }   # -> 123
 
=head2 catonce (;$file)
 
Считывает файл в первый раз. Любая последующая попытка считать этот файл возвращает C<undef>. Используется для вставки модулей js и css в резул...
 
=over

t/aion/fs.t  view on Meta::CPAN 

654
655
656
657
658
659
660
661
662
663
664
665
666
667
668
669
670
671
672
673
674
#@< EOF
# 
# Файл lib/N.pm:
#@> lib/N.pm
#>> package N;
#>> sub ex { 123 }
#>> 1;
#@< EOF
# 
done_testing; }; subtest 'include (;$pkg)' => sub { 
use lib "lib";
::like scalar do {include("A")->new}, qr!A=HASH\(0x\w+\)!, 'include("A")->new               # ~> A=HASH\(0x\w+\)';
::is_deeply scalar do {[map include, qw/A N/]}, scalar do {[qw/A N/]}, '[map include, qw/A N/]          # --> [qw/A N/]';
::is scalar do {{ local $_="N"; include->ex }}, scalar do{123}, '{ local $_="N"; include->ex }   # -> 123';
 
# 
# ## catonce (;$file)
# 
# Считывает файл в первый раз. Любая последующая попытка считать этот файл возвращает `undef`. Используется для вставки модулей js и css в резуÐ...
# 
# * `$file` может содержать массивы из двух элементов. Первый рассматривается как путь, а второй — как слой. Слой по умолчанию — `:utf8`.



( run in 0.276 second using v1.01-cache-2.11-cpan-4e96b696675 )