小编bdi*_*zle的帖子

html新闻稿模板的标准大小

我想创建一个通过电子邮件发送的html新闻稿模板,但是,我不确定它的标准尺寸.800w会好吗?或者我应该去更小的东西?

对于网页,我的标准通常是970w,但不确定什么是html简报的最佳做法.

谢谢

html newsletter width

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

在perl中访问json结构的值

我有一个json结构,我正在解码,看起来像这样:

  person => {
    city => "Chicago",
    id => 123,
    name => "Joe Smith",
    pets => {
      cats => [
                { age => 6, name => "cat1", type => "siamese", weight => "10 kilos" },
                { age => 10, name => "cat2", type => "siamese", weight => "13 kilos" },
              ],
      dogs => [
                { age => 7, name => "dog1", type => "siamese", weight => "20 kilos" },
                { age => 5, name => "dog2", type => "siamese", weight …
Run Code Online (Sandbox Code Playgroud)

perl hash json hash-of-hashes

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

如何检查| 在Perl中进行替换

我有一个包含以下数据的字符串

"email@domain.com | firstname | lastname"
Run Code Online (Sandbox Code Playgroud)

我想| lastname用不同的值替换.如果我用来s/替换,我需要对|做什么 让它识别.如果我做

$foo =~ s/ lastname/fillertext/;
Run Code Online (Sandbox Code Playgroud)

它工作正常.但如果我这样做

$foo =~ s/ | lastname/fillertext/;
Run Code Online (Sandbox Code Playgroud)

它不起作用.我试图做的- ,\|/ lastname,."| lastname"'| lastname'

regex perl expression

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

从要在json编码/解码perl中使用的变量创建哈希

我正在尝试创建一个测试模块来测试json编码.我有问题创建将使用json编码/解码正确输出的变量.如果我只使用@cats数组中的$ cat_1,它将正常工作.但是,使用两者,它打印出"HASH(...",如下所示.

use strict;
use JSON;
use Data::Dump qw( dump );

my $cat_1 = {'name' => 'cat1', 'age' => '6', 'weight' => '10 kilos', 'type' => 'siamese'};
my $cat_2 = {'name' => 'cat2', 'age' => '10', 'weight' => '13 kilos', 'type' => 'siamese'};

my @cats;
push(@cats, $cat_1);
push(@cats, $cat_2);

my $dog_1 = {'name' => 'dog1', 'age' => '7', 'weight' => '20 kilos', 'type' => 'siamese'};
my $dog_2 = {'name' => 'dog2', 'age' => '5', 'weight' => '15 kilos', 'type' => …
Run Code Online (Sandbox Code Playgroud)

arrays perl hash json

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

从perl插入mysql时的dup条目

我正在从perl插入一个mysql数据库.我在第一次插入后得到重复错误.这是我用于插入的代码.我正在从json的回复中提取一个id.我输出了我在代码下面收到的内容

  foreach my $listing(@{$json_text->{listings}})
    {
      my $id = $listing->{id};
   print "\nid = $id \n";


    # DO THE INSERT
    my $query_insert = "INSERT INTO calendar (id) VALUES ($id)";
    print "query insert = $query_insert \n";
    my $query = $db->do($query_insert); 
   print "query = $query \n";

    } #end foreach
Run Code Online (Sandbox Code Playgroud)

这是我收到的输出.(返回没有复制到右边.所以下面看起来,但正确的数据在那里).这就像133 my $ query = $ db-> do($ query_insert);

id = 2576246314 query insert = INSERT INTO calendar(id)VALUES(2576246314)query = 1

id = 2576246678 query insert = INSERT INTO calendar(id)VALUES(2576246678)DBD :: mysql :: db do failed:在./calendar_run.pl第133行为'PRIMARY'键复制条目'2147483647'.query …

mysql perl insert dbi

0
推荐指数
1
解决办法
1520
查看次数

标签 统计

perl ×4

hash ×2

json ×2

arrays ×1

dbi ×1

expression ×1

hash-of-hashes ×1

html ×1

insert ×1

mysql ×1

newsletter ×1

regex ×1

width ×1