PGM->Perl/文字列操作 - プログラミングの勉強をしよう@Wiki

Top > PGM->Perl > 文字列操作

文字列操作

改行の除去

my $str;
 
# 設定
$str = "aaa bbb ccc\n";
 
# 出力
print "---------------------------------------\n";
print "[$str]";
print "\n";
print "\n";
# 改行を除いて出力
chomp $str;
 
# 出力
print "---------------------------------------\n";
print "[$str]";
 
 

>perl sample.pl
---------------------------------------
[aaa bbb ccc
]
 
---------------------------------------
[aaa bbb ccc]
>
 

文字列の分割

# 設定
my $str;
 
# 値設定
$str = "aaa bbb ccc ddd eee";
 
# 配列に分割
@fields = split(/ /, $str);
 
foreach $value(@fields){
	print $value . "\n";
}
 

>perl sample.pl
aaa
bbb
ccc
ddd
eee
 
>
 

文字列の抽出

# 設定
my $str;
 
# 値設定
$str = "aaa bbb ccc ddd eee";
 
# 文字列抽出
$data = substr($str, 3, 10);
 
# 出力
print "[$data]" . "\n";
 
 

>perl sample.pl
[ bbb ccc d]
 
>
 

---