Chinaunix首页 | 论坛 | 博客
  • 博客访问: 1182630
  • 博文数量: 398
  • 博客积分: 10110
  • 博客等级: 上将
  • 技术积分: 4055
  • 用 户 组: 普通用户
  • 注册时间: 2007-12-23 20:01
个人简介

新博客http://www.cnblogs.com/zhjh256 欢迎访问

文章分类

全部博文(398)

文章存档

2012年(1)

2011年(41)

2010年(16)

2009年(98)

2008年(142)

2007年(100)

我的朋友

分类:

2009-04-10 11:54:21

perl中变量的格式化可以使用sprintf函数
 
$var1="bssdata";
$var2="bsswork.cust_hist_p";
$header=sprintf("%24s","header") . "|\n";
$var1=sprintf("%24s","$var1") . "|\n";
$var2=sprintf("%24s","$var2") . "|\n";
print "$header$var1$var2";
^D
                  header|
                 bssdata|
     bsswork.cust_hist_p|
 
 
靠左
$var1="bssdata";
$var2="bsswork.cust_hist_p";
$header=sprintf("%-24s","header") . "|\n";
$var1=sprintf("%-24s","$var1") . "|\n";
$var2=sprintf("%-24s","$var2") . "|\n";
print "$header$var1$var2";
^D
header                  |
bssdata                 |
bsswork.cust_hist_p     |
阅读(664) | 评论(0) | 转发(0) |
给主人留下些什么吧!~~