say 'Storable: ', ${ thaw 
                     freeze 
                     \(my $tst = substr 'abc', 0) };