需要制作具有以下功能的模板:

• 包含两个容器(行)
  • 顶行是固定大小
  • 底部尺寸适合最大可用垂直空间
• 应该动态调整底部容器内的文本(字体大小)以适应容器高度.

第一个问题的答案很简单,但在这里添加它,因为不知道第二个问题不依赖于它.

这里有很多问题,询问如何动态调整textarea或输入字段中的文本.但这个问题更为特殊,因为可能需要计算单词或其他一些以适应容器大小.

有人可以帮我提一下已经完成的jquery或任何其他js/css解决方案吗？

我不是一个网页设计师,只想制作一个简单的网页模板,用于调整我的文本 - 我知道一点点css - 但不是javascript - 因此要求指向任何"准备运行"的解决方案,如果存在......

编辑

检查溢出解决方案,这个答案/sf/answers/499728001/可以很好地检测垂直溢出.现在的问题是,如何将上面的溢出javascript检查添加到循环中,什么会将我的字体更改为更小.

为了更好地说明附加两个演示图像......

在梅森,我可以定义一个过滤器:

<%filter Div($class)>
        <div class="<% $class %>">
                <% $yield->() %>
        </div>
</%filter>

后来我可以用它

% $.Div("row") {{
   1 The "$yield->()" method returns everything from here (free text)
%       $.Div("col") {{
                2 even could have another nested filter, etc...
%       }}
% }}

结果

<div class="row">
    1 The "$yield->()" method returns everything from here (free text)
   <div class="col">
            2 even could have another nested filter, etc...   
   </div>
</div>

例如,该$yield->()方法返回封闭过滤器内部的所有内容.

想要使用Text :: Xslate实现相同的功能,但不知道如何.

我找到的最接近的东西是我可以写的宏块:

: …

两个起点:

• 在回答为什么现代Perl默认情况下避免使用UTF-8？tchrist指出了确保Perl中正确的Unicode处理所需的52件事.答案显示了带有一些use语句的样板代码.关于Unicode的使用的类似问题是如何使用现代perl和utf8默认值来"使用My :: defaults"？

• 该PSGI规范是面向设计字节.编码/解码所有内容是我的责任,因此对于Plack应用程序,正确的方法是对输出和解码输入进行编码,例如:

  use Encode;
  my $app = sub {
      my $output = encode_utf8( myapp() );
      return [ 200, [ 'Content-Type' =>'text/plain' ], [ $str ] ];
  };
  

  Run Code Online (Sandbox Code Playgroud)

使用是否正确

use uni::perl; # or any similar

在PSGI应用程序和/或我的模块中？

uni::perl 将Perl的默认IO更改为UTF-8,因此:

use open qw(:std :utf8);
binmode(STDIN,   ":utf8");
binmode(STDOUT,  ":utf8");
binmode(STDERR,  ":utf8");

这样做会破坏Plack或其中间件吗？或者是在开放时明确编写/解码Plack的应用程序的唯一正确方法,所以没有open编译指示？

为下一个代码寻找更好的解决方案:

for i in a b c
do
  for j in A B C
  do
    for k in 1 2 3
    do
      echo "$i$j$k"
    done
  done
done

当然这里有一些更简单的解决方案.

想着下一个.有一个列表

qw(a b c);

现在,将LIST分配给无名(匿名)ARRAY

[ qw(a b c) ]

所以下一个

use 5.016;
use warnings;
use diagnostics;
my $x = [ qw(a b c) ];
say ref $x;  #ARRAY - the $x is an ARRAY reference, and
say $x->[1]; #prints "b", and
say [ qw(a b c) ]->[1]; #works too

但现在发生了什么？

use 5.016;
use warnings 'all';
use diagnostics;
say ${[ qw(a b c) ]}[1];

它打印b,但

my $y = ${[ qw(a b c) ]};

是一个错误,

Not a SCALAR reference …

当以下代码可能有副作用？

@some = map { s/xxx/y/; $_ } @some;

perlcritic解释它是危险的,因为例如:

@other = map { s/xxx/y/; $_ } @some;

和成员@someGOT 也修改.了解.我有BPB书,它通过示例显示了上面的内容

@pm_files_without_pl_files
         = grep { s/.pm\z/.pl/xms && !-e } @pm_files;

我还阅读了" 列表处理副作用 " 一章/" 绝不修改列表函数中的$ _ ".及其粉丝.我也知道/r.

要明确(尽管我可怕的英语很可能):

在第一个例子中,要点是修改原件@some.

问题是:

• 第一个例子会 @some = map { s/xxx/y/; $_ } @some; 导致一些不必要的副作用吗？如果是,何时？
• 或者它只是"未推荐"的方式(否则无害)？

正在寻找答案,因为一些"perl初学者的书" - 因此仍然不接受任何当前的答案.;)

我看到了这个问题：“标准”和块包装声明之间有什么区别吗？和思考main package。当我编写脚本时，例如：

---- begin of the file ---
#!/usr/bin/perl  #probably removed by shell?
my $var; #defined from now up to the end of file
...
---- end of the file ----

这会自动包含在main包装中，因此据我所知，接下来会发生。

---- begin of the file ---
{ #<-- 1st line
  package main;
  my $var; #variable transformed to block scope - "up to the end of block"
  ...
} # <-- last line
---- end of the file ----

相当于

---- begin of …

如果我理解正确,PSGI应用程序将作为下一个:

• 得到了浏览器的请求
• 通过顺序中的某些中间件,请求是"气泡",因为它们是在中定义的 builder
• 请求来到我的应用程序
• 我的应用程序产生一些响应
• 这通过一些中间件再次响应泡沫
• 最后将响应发送到浏览器

当请求登陆我的时,我可以轻松地调试打印所有标题(例如cookie)$app.

问题是: 如何调试 - 打印实际状态,headers同时请求通过许多中间件到我的应用程序,而响应再次通过中间件出去.

所以,有一个(简单)app.psgi,像下一个:

use strict;
use warnings;
use Plack::Builder;

my $app = sub { ... };

builder {
         # <- debug-print the first request headers
         #                and the last respond headers here
    enable "Debug";
         # <- debug-print the actual state of request/respond headers here
    enable "mid2";
         # <- and here
    enable "mid3";
         # <- and here

    $app; # <- and finally here - …

有这个示例代码 - 扩展Some包并重新定义func方法的2个包.

use 5.014;
use warnings;

package Some {
    use Moose;
    use warnings;
    sub func { say 'func from Some'; }
}

package Over {
    use Moose;
    use warnings;
    extends 'Some';
    override 'func' => sub { say 'func from Over'; };
}

package Plain {
    use Moose;
    use warnings;
    extends 'Some';
    sub func { say 'func from Plain'; };
}

#main
for my $package ( qw(Some Over Plain) ) {
    my $instance = $package->new();
    $instance->func; …

在嵌入式lua环境(魔兽世界 - 魔兽世界)中缺少这个require功能.

我希望端口一个现有的lua源代码(一个很棒的OO库)供在WoW中使用它.图书馆本身相对较小(约8个小文件)但当然它大量使用require.

魔兽世界通过在XML文件中定义文件和库来加载文件和库,如:

<Ui xsi:schemaLocation="http://www.blizzard.com/wow/ui/">
    <Script file="LibOne.lua"/>
    <Script file="LibTwo.lua"/>
</Ui>

但我不知道在WoW中如何完成低级库操作.

"魔兽世界"中的AFAIK也缺席package.了.:(

所以问题:对我来说,简化的方法是编写一个函数,它将require使用WoW中提供的接口来模拟函数.问题是如何.有人可以给我一些指示吗？

或者作为替代方案,为了将提到的现有源移植到WoW,我需要将require Some.Other.Modulelua源中的行替换为WoW将理解的内容.require Some.Module魔兽世界的等效/替代品是什么？

WoW如何处理低级别的模块/库？