I don't know Perl but now I need to correct Perl script, so I hope you can help me.
I have a Perl script which allows to process files with the next structure of name: CCCCNNNN.16X, where CCCC - 4 characters, NNNN - 4 numbers and X might be "o" or "n", for example, bshm1930.16o.
This script creates command for Linux command line but it doesn't pick files correct. As I understand, the problem is in this part of code:
# add ephemeris file
$ephfile = $rawfile;
$ephfile =~ s/$stationID/bshm/;
$ephfile =~ s/\.([0-9])o/.$1n/;
push @opt, "--nav $ephfile";
The regular expression pattern in your substitution does not match
This will match a nine or a zero followed by one any number, followed by an o, and then replace it with a dot, the two digits, and an
See the explanation on https://regex101.com/r/kA0zR5/2.