通过模式匹配移动文件夹中的文件

xxxx_xx_S1_xx_L001_x.pdf
xxxx_xx_S2_xx_L002_x.pdf
xxxx_xx_S3_x_L002_xx.pdf
xxx_xx_S9_x_L002_xxxxx.pdf

以及名为S1、S2、S3、S9的文件夹列表

我想根据S移动相应文件夹中的文件*

我想是这样的:

find . -name "*S*.pdf" | \
     while read filename
     do
     directory=${filename%.pdf}
     mv "$filename" "$directory"/"$filename"
     done

但不幸的是,文件仍然存在,文件夹是空的。