Monday, 8 July 2013

perl substr function usage

$s='hi this is sam';
$f = substr $s, 1, 9;
$s=~s/$f/sam/;
print $s

No comments:

Post a Comment