bless allows you to calls methods on the blessed object.

tie allows you to override built-in operations on variables, namely reading from/assigning to scalars, and list and hash operations like indexing, exists, delete etc.

So in some sense, tie works on a variable and bless works on a thing that is stored in a variable.

"bless allows you to calls methods on the blessed object." , and "the blessed object" actually a data structure saying a hash and bless tells Perl how the hash can be used(methods defined in package). I still feel they're hard to distinguish in their very initial goal.

With tie you bless a named variable, and a predefined set of methods for that variable type are called automatically as the variable is used.

It allows the variables to be used exactly as if they were normal Perl variables of that type rather than requiring the methods be called using object syntax, which makes for very natural usage:

tie my @array, 'Some::Thing';

...

$array[ $n ] *= 5;
[download]

Rather than the clumsy:

my $myObj  = Some::Thing->new();
...

$myObj->setItem( $n, $myObj->getItem( $n ) * 5 );
[download]

The documents (as usual) have a few hints.

googling the monastery

supersearching (klick search)

general googling

Still any questions left?

Thank you all for the wonderful reply. All replies are what I wanted: concise and by analogy. Sorry for late thanks as the New Year holiday. Frankly to say I didn't catch the answers all yet. But I'll read more as LanX suggested and then read your words again before any further question. Thanks and Happay new year!