hw can i count the number of character in a file by perl

Shell Programming and Scripting
1

i want to count the number of character contained in afile using perl cript help me out

2 
$size = (stat("/path/to/file"))[7];

Jean-Pierre.