小编use*_*149的帖子

perl(良好实践):socket的词法文件句柄

在perdoc Socket页面中,它们使用全局文件句柄作为套接字.但是如果我在子进程调用的子例程中创建一个套接字,那么使用Socket仍然可以更好地使用词法文件句柄吗?

像这样:

use strict;
use Socket;
sub sendData
{
    my $proto = getprotobyname('tcp');
    my $socket;
    socket($socket, PF_INET, SOCK_STREAM, $proto);
    ...
    close($socket)
}
Run Code Online (Sandbox Code Playgroud)

代替:

sub sendData
{
    my $proto = getprotobyname('tcp');
    socket(SOCKET, PF_INET, SOCK_STREAM, $proto);
    ...
    close(SOCKET)
}
Run Code Online (Sandbox Code Playgroud)

这似乎没问题,但我不知道这是一种更好的做法还是完全无用的......

谢谢

sockets perl

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

在Perl中,如何使用正则表达式替换运算符替换子字符串中的非ASCII字符?

如何使用此命令:

perl -pi -e 's/[^[:ascii:]]/#/g' file
Run Code Online (Sandbox Code Playgroud)

只更改偏移A处的字符到每行的偏移量B?

regex perl

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

标签 统计

perl ×2

regex ×1

sockets ×1