diff --git a/Perl-Client-AccountID.md b/Perl-Client-AccountID.md
new file mode 100644
index 0000000..132e883
--- /dev/null
+++ b/Perl-Client-AccountID.md
@@ -0,0 +1,11 @@
+Retrieve a [client](client)'s account ID. An Account ID is wraps all characters together, and can be found in the database [Account](account).
+
+### Example
+
+```perl
+sub EVENT_SAY {
+	if($text=~/hail/i) {
+		quest::say("Your account ID is: ".$client->AccountID().".";
+	}
+}
+```
\ No newline at end of file