这个脚本在Perl中做了什么？

Question

有人能解释一下这个脚本的后半部分是做什么的吗？ （第二行） $ self在别处被定义了......（我知道那个部分是做什么的，只是想知道动作是什么=〜...是关于/）

$action = "http://example.com/test.php";

$action = $self->{url} . ($action =~ /^\// ? "" : "/" ) . $action;

Answer 1

如果$action以斜杠开头，则返回空字符串;如果斜杠不以斜杠开头，则返回斜杠。