小编Sin*_*nür的帖子

CSS网站如何

有人可以为我提供良好的链接来制作这样的网站..我的意思是设计真的很棒,我想做一些新的和更专业的东西,而不仅仅是在Photoshop中设计然后制作一个框架和瞧..

http://fusionmedia.dk/ http://tjenonline.dk/

再次,我想学习如何做这样的网站,菜单栏和整个设计是大而舒适的所有屏幕解决方案..我相信它的CSS和HTML正常(当我按下查看源,它就像那样)

html css

-3
推荐指数
1
解决办法
146
查看次数

Perl:为什么双引号在打印时会增加额外的空间?

我希望以下2张照片是相同的.

@a=(a..z);
print "@a\n";
print @a;
Run Code Online (Sandbox Code Playgroud)

但实际上,它给了我这个:

a b c d e f g h i j k l m n o p q r s t u v w x y z
abcdefghijklmnopqrstuvwxyz
Run Code Online (Sandbox Code Playgroud)

为什么多余的空间?

我正在使用ActivePerl for Windows.

更新

通过以下2个答案,我想出了这个:

use English;
$LIST_SEPARATOR="*";
@a=(a..z);
print "@a\n";
Run Code Online (Sandbox Code Playgroud)

它给了我这个:

a*b*c*d*e*f*g*h*i*j*k*l*m*n*o*p*q*r*s*t*u*v*w*x*y*z
Run Code Online (Sandbox Code Playgroud)

perl

-3
推荐指数
2
解决办法
253
查看次数

在Perl中,如何使用变量的内容作为哈希的名称?

下面的代码只适用于没有严格的代码.谁能建议一个更好的方法呢?

%hash5=('key5', 5);
my $hash_name = 'hash5';
print $$hash_name{'key5'}, "\n";
Run Code Online (Sandbox Code Playgroud)

我的目标:我不知道哈希名称.我只知道,它存储在变量$ hash_name中.人们一直在建议:

 my $hashref = \%hashABC;
Run Code Online (Sandbox Code Playgroud)

这需要我知道哈希名称是'%hashABC'.在上面使用这个例子,我想做某事:

 my $hash_name = 'hashABC'; 
 my $hashref = \%$hash_name; # not possible, hope u get the aim
Run Code Online (Sandbox Code Playgroud)

现在我不再需要知道哈希的名字了.这就是我想要的.

很多人!(perl 5)

perl hash strict

-3
推荐指数
1
解决办法
114
查看次数

Perl模块如何"工作"?

我对Perl模块感到困惑.我得到一个模块可以用来转储一大堆子,整理主代码.

但是,模块之间的关系是什么?

模块可以"使用"其他模块吗?

我必须使用导出,还是可以放弃那些东西?

我如何解决循环使用?(Security.pm使用Html.pmHtml.pm使用Security.pm).我知道明显的答案,但在某些情况下我需要使用Security.pm例程,Html.pm反之亦然 - 不知道如何解决问题.

如果我从所有模块中删除所有"use"子句......那么我必须使用完整的子限定符.例如,Pm::Html::get_user_friends($dbh, $uid)将用于Security确定朋友是否是被禁用的用户(被禁止的是其中一部分Security).

我只是没有得到这个模块的东西.所有"教程"只涉及一个模块,从不多重,也不使用真实世界的例子.

我遇到多个模块的唯一一次是使用OO代码.但没有任何东西可以确切地告诉我多个模块如何相互作用.

perl perl-module

-3
推荐指数
2
解决办法
606
查看次数

如何使用Perl拆分文本文件并将其存储到2d数组中?

230215 01/16/2000 57533 "" 0 1045403 "" ? 0 0 217623

230215 01/18/2000 77659 "" 0 1045403 "" ? 0 0 217624

230215 01/25/2000 76583 "" 0 1045403 "" ? 0 0 217625

230215 01/29/2000 58082 "" 0 1045403 "" ? 0 0 217626

230216 01/14/2000 50020 "" 0 1045403 "" ? 0 0 217627

230216 01/18/2000 66444 "" 0 1045403 "" ? 0 0 217628

230216 01/19/2000 51330 "" 0 1045403 "" ? 0 0 217629
Run Code Online (Sandbox Code Playgroud)

所有字段都用空格分隔,我需要将它存储到二维数组中.实际上有500万行像这样.例如,我想将它存储到像$ arr [7] …

arrays perl text

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

在Perl的tr ///运算符的第一部分中没有指定的字符会发生什么?

我使用Perl进行字符串操作,并且使用反向函数和tr来翻译我的字符串.该脚本读取一些字符串,然后执行以下操作:

$revread = reverse($newword);
$revread =~ tr/TACGN/ATGCN/;
Run Code Online (Sandbox Code Playgroud)

所以这个词被反转然后被翻译 - 反向补充.我有以下问题:

如果

$revread=~ tr/TACG/ATGC/;
Run Code Online (Sandbox Code Playgroud)

用来.在这种情况下,如果找到"N",它会被跳过吗?因为我没有任何东西可以将它翻译成OR,它将被打印为"N".

perl tr

-4
推荐指数
1
解决办法
114
查看次数

在perl中创建具有多个coloumn的多维数组

ID  Cat    
1   Car          
2   Education     
3   Mathematics   
4   Physics       
5   Astrophysics

基于此列表,我想以下列方式生成和访问数组:

Array
(
    [0] => Array
        (
            [id] => 1
            [cat] => car
        )

    [1] => Array
        (
            [id] => 2
            [cat] => Education
        )

      [2] => Array
        (
            [id] => 3
            [cat] => Mathematics
        )   


)
Run Code Online (Sandbox Code Playgroud)

等到阵列结束.

perl

-5
推荐指数
1
解决办法
35
查看次数

Perl数字格式

我如何格式化这个例子:

100000为1000.00

90为0.90

用Perl?

我发现,用像一些模块尝试Locale::Currency::FormatNumber::Format,但没有工作:/

随着Locale::Currency::Format我尝试:

use Locale::Currency::Format;
my $total = 19750;
my $convert = currency_format('USD',$total,'FMT_COMMON');
print $convert;
Run Code Online (Sandbox Code Playgroud)

我预计197.50但是印刷品是"19,750.00美元".

format perl

-6
推荐指数
1
解决办法
486
查看次数

在Perl中,如何使用正则表达式替换从字符串中删除+号?

在Perl中我有一个URL读取health+development,我想+从中间删除它,以便它可以读作health development.任何想法都会节省我的时间.

perl

-7
推荐指数
1
解决办法
130
查看次数

标签 统计

perl ×8

arrays ×1

css ×1

format ×1

hash ×1

html ×1

perl-module ×1

strict ×1

text ×1

tr ×1