diff --git a/challenge-097/roger-bell-west/blog.txt b/challenge-097/roger-bell-west/blog.txt
new file mode 100644
index 0000000000..e75b1aab46
--- /dev/null
+++ b/challenge-097/roger-bell-west/blog.txt
@@ -0,0 +1 @@
+https://blog.firedrake.org/archive/2021/01/Perl_Weekly_Challenge_97__Caesar_Substrings.html