$_ = 'aaaaaaaaaaa';

my $x = s/a//;

print "$x\n";