if (@changes) { # do stuff here } #### my $length = length $some_string;