如何对这个替换的Perl子程序进行高尔夫？

概述我在Perl中有以下子程序用“abc”替换字符串中的“xyz”： sub mySubst { my ($str) = @_; $str =~ s|abc|xyz|ig; return $str; } 它有效,但对于Perl来说似乎太冗长了.我怎样才能把它收紧？ 这是我如何更惯用地渲染该子例程： sub mySubst { (my $str = shift) 我在Perl中有以下子程序用“abc”替换字符串中的“xyz”：

sub mySubst {    my ($str) = @_;    $str =~ s|abc|xyz|ig;    return $str;    }

它有效,但对于Perl来说似乎太冗长了.我怎样才能把它收紧？

解决方法 这是我如何更惯用地渲染该子例程：

sub mySubst {    (my $str = shift) =~ s|abc|xyz|ig;    return $str;}

总结

以上是内存溢出为你收集整理的如何对这个替换的Perl子程序进行高尔夫？全部内容，希望文章能够帮你解决如何对这个替换的Perl子程序进行高尔夫？所遇到的程序开发问题。

如果觉得内存溢出网站内容还不错，欢迎将内存溢出网站推荐给程序员好友。