问题标签 [mason]

在某些项目（ Mason ）中有很多 perl 模块（> 200）。真正使用了这段代码的 5-10%。我怎么看，哪些子程序被使用（或未使用）？

我必须从 .pdf 文件中编写代码，然后将其复制到任何其他 pdf 文件中。我为打开文件而编写的代码如下所示：

其中 filename 是将 pdf 内容保存到的文件的名称，“fullname”是从中获取内容的 pdf

我正在编写一个 Mason 1.x 组件页面，但它的行为不像我预期的那样。perlsub 手册页指出一个my变量应该可以在sub. 但是下面的代码：

给我错误：

编译 /opt/rt4/local/plugins/RTx-Foo/html/cf/helpers/ticketQuery.ajx 时出错：变量“@myOrderBy”在 /opt/rt4/local/plugins/RTx-Foo/html 不可用/cf/helpers/ticketQuery.ajx 第 206 行。

（第206行是foreach行）

相同的代码在非 Mason 上下文中运行良好。

我正在使用HTML::Mason提供包含表单的网页。填写并提交表单后，我想知道远程客户端的 IP 地址。

我尝试打印$r->headers_in，但我得到了

我使用了错误的论点吗？

我正在尝试进行简单的 Rose DB 调用： $id = xyz; $name = "公司";

可能不会每次都编写整个查询，并将其声明为字符串变量，这样我就可以调用

其中 $query = qq { id => $id , name => $name };

请帮忙

我正在尝试打这个简单的电话：

效果很好。但是是否可以为查询传递一个变量。就像是：

或类似的东西。

/video/metadata（梅森组件）

它返回页面的每个 html 元素，而不是来自组件调用的 json！
指定数据类型/内容类型给出解析器错误

当我从独立脚本中使用时，上面的mason代码运行良好Mason，如HTML::Mason::Admin. 不幸的是，当运行时perl_mode， $a是一个空字符串。下面是我的httpd.conf

顺便提一句

我只是尝试IPC::Run在独立模式和mod_perl模式下都运行良好。看来我必须更新我所有的源代码才能使用IPC::Run而不是IPC::Run3.

我有一个 perl mason 组件，它被调用来显示一个包含线程注释的 html 页面。它使用 DBI 类从 MySQL 数据库加载。

问题是有时，我的意思是有时，变量在代码中途非常不规则地失去它的值。我不会在它开始和停止发生之间更改代码，只是重新加载页面。它甚至不只是在一个页面加载而不是下一个页面上具有价值。这是在一个页面加载时，您可以打印一些内容以显示该变量包含对对象的引用（具有名称的“Person”等），稍后在同一页面加载的代码中，您可以再次打印它并且表明它没有。在下一页加载时，变量可能会一直保持其值。唯一发生的事情是变量通过对 $m->comp() 的调用传递，如果它为空，则应用默认值。

此外，每条评论都会发生这种情况，在同一页面加载中多次有效地失去其价值。

不幸的是（或者幸运的是，取决于你如何看待它）我不能逐字发布所有涉及的代码，但它归结为以下内容，请注意标记为“HERE”的两条注释行：

我尝试删除该默认值，在这种情况下我得到一个空变量。

这是一个多年前的问题，仔细检查到这几行代码，从编程上讲，似乎发生了一些不可能的事情。我在 Mason 中留下了一个可能的错误，或者可能是一些东西的组合，比如 DBI 类和数据库失去连接之间的一些巫术，或者我不知道 $m->comp() 的东西。

我唯一的其他线索是，当我向页面添加一些内容时，我的问题出现在一个全新的变量上。不幸的是，我永远不知道问题何时会发生，而且这种情况很少发生，以至于我无法将一些建议的调试代码投入其中，这将立即给我一些反馈。我只希望有人经历过类似的事情或知道一些可能的问题来解释正在发生的事情。

简单的问题：有没有办法可以在 perl mason 文件中创建一个常量字符串？我希望能够将硬编码字符串分配给我的 perl 文件顶部的变量，然后能够在文件的其余部分中使用它。相当于Java的东西

private static final String DEFAULT_USERNAME = "Bobby Joe";