点击运行
#!/usr/bin/perl @sites = qw/google taobao jiyik weibo qq facebook 网易/; @sites2 = @sites[3,4,5]; print "@sites2\n";
运行结果 :
正在执行...