diff --git a/lib/RevBank/Users.pm b/lib/RevBank/Users.pm
index a6356b8..f393f2c 100644
--- a/lib/RevBank/Users.pm
+++ b/lib/RevBank/Users.pm
@@ -22,6 +22,11 @@ sub balance {
     return _read()->{ lc $name }->[1];
 }
 
+sub since {
+    my ($name) = @_;
+    return _read()->{ lc $name }->[3];
+}
+
 sub create {
     my ($username) = @_;
     open my $fh, '>>', $filename or die $!;