diff --git a/filesex.pl b/filesex.pl
index 526f0c2..f85a7c9 100644
--- a/filesex.pl
+++ b/filesex.pl
@@ -367,6 +367,9 @@
 matches_type(directory, Entry) :-
     !,
     exists_directory(Entry).
+matches_type(regular, Entry) :-
+    !,
+    exists_file(Entry).
 matches_type(Type, Entry) :-
     \+ exists_directory(Entry),
     user:prolog_file_type(Ext, Type),