my $self = {scalarvariable => 1};