How to adjust the number of spaces before equals when formatting

[junpayment]

Hello.

Sometimes I think that there are too many spaces before "=". Personally I want the function to adjust because I think that one space is enough.

my $hoge = "hoge";
my $fuga_fuga "fugafuga";

formatted

my $hoge         = "hoge";
my $fuga_fuga    = "fugafuga";

i want

my $hoge      = "hoge";
my $fuga_fuga = "fugafuga";