diff --git a/bluetooth_info.pl b/bluetooth_info.pl
index b1eb644..90d17d2 100755
--- a/bluetooth_info.pl
+++ b/bluetooth_info.pl
@@ -1,4 +1,5 @@
 #!/usr/bin/perl -l
+# Perl script to display information about connected bluetooth devices. Designed to be used with polybar
 
 use strict;
 use warnings;