#!/usr/bin/perl $maximum = &max (3, 4, 8, 20, 9, 32, 12, 22); 传标量列表给子程序max sub max {  
Copyright © 2005-2025 51CTO.COM 版权所有 京ICP证060544号