weidagang2046的專欄
          

          物格而后知致
          

          

          

          隨筆 - 8, 文章 - 409, 評(píng)論 - 101, 引用 - 0
          

          


          		
	
          

          

          
	
          
		
			
          
				數(shù)據(jù)加載中……
			
          
		          		
		
			
          
				
					
	
          
		
          
			匹配某目錄下所有文件
		
          
		
          
		
		
          
				#
				!/usr/bin/perl?-w
				
						
          
				          
				
						
          
				          
				$file_pattern
				?
				=
				?
				'
				f:/tmp/*.pl
				'
				;

          
				@file_list
				?
				=
				?
				glob
				(
				$file_pattern
				);

          
				foreach
				?
				$file
				?(
				@file_list
				)
          {
          ????          
				print
				?
				$file
				,
				?
				"
				\n
				"
				;
          }          
		
          

		
          
		
          
			posted on 2006-03-26 17:30 weidagang2046 閱讀(310) 評(píng)論(0)  編輯  收藏  所屬分類: Perl 
		
          
	
          
	
	


	


          
	    
    




          








          

				
			
          
		          		
	
          
	
          
		
			

		
	
          

          


    







          
        
	




主站蜘蛛池模板：
资溪县|
张家港市|
浮山县|
苏尼特左旗|
科技|
鄱阳县|
乐昌市|
库尔勒市|
孟村|
高平市|
吉首市|
贺兰县|
左云县|
怀远县|
全州县|
炉霍县|
晋州市|
鄂托克前旗|
城固县|
越西县|
陆丰市|
苏尼特左旗|
南昌县|
隆尧县|
巴林左旗|
泸水县|
沂水县|
淳安县|
苍溪县|
宜都市|
伊宁市|
寿光市|
加查县|
大宁县|
湄潭县|
拉萨市|
静宁县|
喀喇沁旗|
讷河市|
如东县|
龙南县|