perl字符串倒置

来源：百度知道 编辑：UC知道 时间：2024/06/26 02:51:27
怎么实现字符串倒置啊？
老师说只用一行语句……郁闷~

用reverse函数可以实现，我写了一个例子程序如下，程序中我用语句$line=<stdin>从键盘上读入一个字符串，然后倒置以后输出，希望你能明白：

#!/usr/bin/perl
$line=<stdin>;
$line=reverse($line);
print $line;

直接在命令行：
perl -e 'my $line=<STDIN>; $line = reverse $line; print "$line\n";'

script中
#! /usr/bin/perl -w

use strict;

my $line = <STDIN>;
$line = reverse $line;
print "$line\n";