点击运行
#!/usr/bin/perl @sites = qw/google taobao jiyik/; print "$sites[0]\n"; print "$sites[1]\n"; print "$sites[2]\n"; print "$sites[-1]\n"; # 负数，反向读取
运行结果 :
正在执行...
