Com o GNU Awk, use patsplit
para dividir o segundo campo delimitado por vírgula em subcampos de no máximo dois dígitos decimais:
$ gawk 'BEGIN{OFS=FS=","} {patsplit($2,a,/[0-9][0-9]?/); $2 = sprintf("%02d/%d%d", a[1], a[2], a[3])} 1' file
1,01/2018,111
2,01/2018,111
3,10/2018,111
Se o Perl é uma opção
perl -F, -lpe '
$F[1] =~ s{(\d\d?)-?(\d+)}{sprintf "%02d/%d", $1, $2}e;
$_ = join ",", @F
' file