小编msc*_*cha的帖子

我正在使用一个API,要求我在请求中使用名为"m_id"的标头.

我用的时候

$mech->add_header('m_id' => 'whatever')

WWW :: Mechanize(或更确切地说是HTTP :: Headers)"帮助"将标题名称更改为"M-Id".哪个不起作用.

有没有办法防止这种情况发生？

我有以下琐碎的脚本:

#!/usr/bin/env perl6

use v6.c;

sub MAIN($x)
{
    say "$x squared is { $x*$x }";
}

当用实数调用它时,这种方法非常好,但我也希望将它传递给复数.当我按原样尝试时,会发生以下情况:

% ./square i
Cannot convert string to number: base-10 number must begin with valid digits or '.' in '?i' (indicated by ?)
  in sub MAIN at ./square line 7
  in block <unit> at ./square line 5

Actually thrown at:
  in sub MAIN at ./square line 7
  in block <unit> at ./square line 5

当我将脚本更改为

#!/usr/bin/env perl6

use v6.c;

sub MAIN(Complex $x)
{
    say …

% raku\nWelcome to Rakudo\xe2\x84\xa2 v2023.08.\nImplementing the Raku\xc2\xae Programming Language v6.d.\nBuilt on MoarVM version 2023.08.\n\nTo exit type 'exit' or '^D'\n[0] > say so 1..0;\nTrue\n

Range如果空值是False，但任何范围都是，这将很有用True。\n这是一个错误还是一个功能？

当我setContent在TinyMCE编辑器上使用时,它将焦点设置为该编辑器控件.

var te = tinymce.get('my_id');
te.setContent('new contents');

有什么办法可以防止这个？

使用整数作为哈希键是否安全？

my %hash;
my $str = ...

for $str.NFC {
    %hash{$_} = ...
}

我有时必须从外部源读取文本文件，这些文件可以使用各种字符编码；通常是 UTF-8、Latin-1 或 Windows CP-1252。

有没有一种方法可以方便地读取这些文件，像 Vim 等编辑器一样自动检测编码？

我希望有这样简单的事情：

open(my $f, \'<:encoding(autodetect)\', \'foo.txt\') or die \'Oops: $!\';\n

请注意，Encode::Guess并不能解决这个问题：它只有在可以明确检测到编码的情况下才有效，否则就会发出嘎嘎声。大多数 UTF-8 数据名义上是有效的 latin-1 数据，因此它在 UTF-8 文件上失败。

例子：

#!/usr/bin/env perl\n\nuse 5.020;\nuse warnings;\n\nuse Encode;\nuse Encode::Guess qw(utf-8 cp1252);\n\nbinmode STDOUT => \'utf8\';\n\nmy $utf8 = "H\\x{C3}\\x{A9}llo, W\\x{C3}\\x{B8}rld!"; # "H\xc3\xa9llo, W\xc3\xb8rld!" in UTF-8\nmy $latin = "H\\x{E9}llo, W\\x{F8}rld!";            # "H\xc3\xa9llo, W\xc3\xb8rld!" in CP-1252\n\n# Version 1\nmy $enc1 = Encode::Guess->guess($latin);\nif (ref($enc1)) {\n    say $enc1->name, \': \', $enc1->decode($latin);\n}\nelse {\n    say "Oops: $enc1";\n}\nmy $enc2 = …