view _test/temp.pl @ 120:41e9d9ea3db5

Merge with 79cdd6c86409806bd1de092d9f0fb2b048775720
author wizard
date Mon, 07 Jun 2010 17:45:14 +0400
parents 196bf443b5e1
children a4b0a819bbda
line wrap: on
line source

#!/usr/bin/perl
use strict;

my $var = "  some stuff";

$var =~ tr/f/ome/;
print $var;