Hmm that has quite a few lines of unneeded code, for example the following:
$read_write =~ s/ /_/gi;
$read_write =~ s/:/_/gi;
...could be written as:
You can't have a difference in case in that specific regex either so the "i" is doing nothing.
Code:
$read_write =~ s/\//_/gi; $read_write =~ s/ /_/gi;
$read_write =~ s/:/_/gi;
...could be written as:
Code:
$read_write =~ y$ /:$_$/;You can't have a difference in case in that specific regex either so the "i" is doing nothing.