AlexMcLean
sub bang {# my $self = shift; ## $self->code->[9] .= "#";## $self->code->[4] =~ s/[\d\.]+/int(rand(@{$self->code}))/e;# $self->code->[14] =~ s/\#\#.*//;# $self->code->[7] =~ s/[\d\.]+/int(rand(@{$self->code}))/e; ## $self->modified;# }# ## ####