view _test/temp.pl @ 116:1722ca51537c

minor changes. Auth no more throws an exception when fails
author wizard
date Mon, 31 May 2010 08:30:39 +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;