1 files changed, 19 insertions, 0 deletions
diff --git a/libc/stdio/perror.c b/libc/stdio/perror.c
new file mode 100644
index 000000000..d6274c056
--- /dev/null
+++ b/libc/stdio/perror.c
@@ -0,0 +1,19 @@
+#include <unistd.h>
+#include <string.h>
+#include <errno.h>
+
+void perror(str)
+__const char *str;
+{
+	register char *ptr;
+
+	if (str) {
+		write(2, str, strlen(str));
+		write(2, ": ", 2);
+	} else
+		write(2, "perror: ", 8);
+
+	ptr = strerror(errno);
+	write(2, ptr, strlen(ptr));
+	write(2, "\n", 1);
+}