learning perl-scalar data