小编sza*_*gab的帖子

如何打包我的Perl脚本以在没有Perl的机器上运行?

人们也经常会问"如何编译Perl?" 而他们真正想要的是创建一个可以在机器上运行的可执行文件,即使他们没有安装Perl.

我知道有几种解决方案:

  1. IndigoStar的perl2exe它是商业的.我从未尝试过.它的网站说它可以交叉编译Win32,Linux和Solaris.
  2. 来自ActiveState的Perl Dev Kit.它是商业的.几年前我在Windows上使用它,它可以很好地满足我的需求.根据其网站,它适用于Windows,Mac OS X,Linux,Solaris,AIX和HP-UX.
  3. PAR或者更确切地说PAR :: Packer是免费和开源的.基于测试报告,它可以在Windows,Mac OS X,Linux,NetBSD和Solaris上运行,但理论上它也可以在其他UNIX系统上运行.最近我开始在Linux上使用PAR进行打包,并且也将在Windows上使用它.

其他推荐解决方案

perl executable compilation distribution

19
推荐指数
2
解决办法
1万
查看次数

如何使用DBI从数据库中获取单个计数值?

对于获得单个计数值,以下代码似乎太多了.是否有更好的,推荐的方法来使用纯DBI获取单个COUNT值?

sub get_count {
   my $sth = $dbh->prepare("SELECT COUNT(*) FROM table WHERE...");
   $sth->execute( @params );
   my $($count) = $sth->fetchrow_array;
   $sth->finish;

   return $count;
}
Run Code Online (Sandbox Code Playgroud)

这个更短,但我还有两个陈述.

sub get_count_2 {
   my $ar = $dbh->selectall_arrayref("SELECT ...", undef, @params)
   return $ar->[0][0];
}
Run Code Online (Sandbox Code Playgroud)

database perl dbi

17
推荐指数
1
解决办法
3万
查看次数

加密数据库中的用户密码的推荐方法是什么?

在用Perl编写并使用PostgreSQL的Web应用程序中,用户拥有用户名和密码.存储密码的推荐方法是什么?

使用crypt()Perl函数和随机盐加密它们?这会将密码的有用长度限制为8个字符,并且需要获取存储的密码,以便与用户在进行身份验证时获取的密码进行比较(以获取附加到其上的盐).

PostgreSQL中有内置的方法可以做到这一点吗?

我应该使用Digest :: MD5吗?

security postgresql perl

17
推荐指数
3
解决办法
2798
查看次数

我如何开始使用Perl 6?

我想了解如何开始使用Perl 6?是否可以使用正在Parrot上构建的Rakudo,或者更好地使用Pugs实现?

如果Rakudo,安装它的最佳方法是什么?鹦鹉的每月发布,鹦鹉的SVN,其他?

parrot pugs rakudo perl6 raku

12
推荐指数
2
解决办法
666
查看次数

如何在Python中加入混合列表(数组)(包含整数)?

我有一个混合的列表(数组)

a = ["x", "2", "y"]
b = ["x", 2, "y"]
print ":".join(a)
print ":".join(b)
Run Code Online (Sandbox Code Playgroud)

第一个连接有效,但第二个连接会引发TypeError异常

我想出了这个,但这是Python解决方案吗?

print ":".join(map(str, b))
Run Code Online (Sandbox Code Playgroud)

BTW最后我只想将这个字符串写入一个文件,所以如果有一个特定的解决方案,我也会很感激.

python

11
推荐指数
1
解决办法
4554
查看次数

如何将Perl输出发送到STDOUT和变量?

我想将命令的输出发送到STDOUT和变量.我想要结合:

my $var = `some command` ;   
system( 'some command' ) ;
Run Code Online (Sandbox Code Playgroud)

Tee是朝着正确方向迈出的一步,但是它将它发送到文件而不是变量.我想我可以读取文件,但直接在那里更简单.

perl

10
推荐指数
2
解决办法
2万
查看次数

Perl YAML模块无法识别标量类型

我加载以下.yaml文件

foo : bar
s : 1
hx: 0x34
Run Code Online (Sandbox Code Playgroud)

用这段代码:

use YAML qw(LoadFile Dump); 
use Data::Dumper; 
my $d=LoadFile("test.yaml"); 
print Dumper($d);
print "x        =", $d->{hx},"\n";
print "x/2      =", $d->{hx}/2,"\n";
print "hex(x)/2 =", hex($d->{hx})/2,"\n";
Run Code Online (Sandbox Code Playgroud)

而输出是

Output:
> ./yaml.pl
$VAR1 = {
          'foo' => 'bar',
          'hx' => '0x34',
          's' => '1'
        };
x        =0x34
x/2      =0
hex(x)/2 =26
Run Code Online (Sandbox Code Playgroud)

这意味着它将所有标量视为字符串,这是我没想到的.从CPAN的YAML文档http://metacpan.org/pod/YAML我假设这是通过隐式标记处理的,并且模块将识别十六进制数.

有人知道怎么做这个吗 ?

perl yaml

9
推荐指数
1
解决办法
288
查看次数

Perl脚本如何知道自己的内存占用?

我有一个长期运行的Perl脚本,我想让它知道(并报告)它使用了多少内存.我想在Linux和Windows上获得这些信息,如果可能的话,也可以在Mac OS X上使用.

linux memory windows macos perl

8
推荐指数
2
解决办法
2743
查看次数

重的iTunes连接刮

我正在寻找不同的选项来从iTunes Connect网站上获取销售报告和其他数据.由于Apple不提供API,我发现的所有解决方案都基于抓取页面.

由于我需要我们提供的产品的信息,我不乐意将所有iTunes帐户提供给第三方服务.这就是为什么我想自己刮掉它或使用在我们的服务器上运行的产品.

我的问题是:

  • 有人经历过苹果改变网络前端的频率吗?
  • 有人从一个服务器到网站的最大请求经验?我害怕被苹果包扎.
  • 我必须记住的其他任何事情会导致严重的麻烦吗?

如果有人对我看到的工具感兴趣,这里有一个列表:

服务:

产品介绍:

开源工具:

更新:

我开始使用Kirby的python脚本(https://github.com/kirbyt/appdailysales),它运行得很好.

screen-scraping itunesconnect itunes

8
推荐指数
1
解决办法
3444
查看次数

net-snmp perl子代理不是由snmpget触发的

我一直在研究自定义的SNMP Mib,我试图让代理返回正确的数据时遇到了问题.

MIB(通过运行验证smilint -l 6):

IDB-MIB DEFINITIONS ::= BEGIN

IMPORTS
        MODULE-IDENTITY, OBJECT-TYPE, Integer32, enterprises
            FROM SNMPv2-SMI
        MODULE-COMPLIANCE, OBJECT-GROUP FROM SNMPv2-CONF;

idb MODULE-IDENTITY
    LAST-UPDATED   "201307300000Z" -- Midnight 30 July 2013
    ORGANIZATION "*********"
    CONTACT-INFO "email: *******"
    DESCRIPTION "description"
    REVISION "201307300000Z" -- Midnight 29 July 2013
    DESCRIPTION "First Draft"
::= { enterprises 42134 }

iDBCompliance MODULE-COMPLIANCE
    STATUS current
    DESCRIPTION
        "Compliance statement for iDB"
    MODULE
        GROUP testGroup
        DESCRIPTION
            "This group is a test group"
::= {idb 1}

test2 OBJECT-TYPE
 SYNTAX         Integer32
 UNITS …
Run Code Online (Sandbox Code Playgroud)

perl snmp mib

8
推荐指数
1
解决办法
1778
查看次数