1 files changed, 0 insertions, 23 deletions
diff --git a/listFolders.pl b/listFolders.pl
deleted file mode 100644
index 5be4bc6..0000000
--- a/listFolders.pl
+++ /dev/null
@@ -1,23 +0,0 @@
-#!/usr/bin/perl
-
-use strict;
-use warnings;
-use Mail::IMAPClient;
-use Data::Dumper;
-
-my $msg;
-my $hostname = "localhost";
-my $login = "matej";
-my $passwd = "lubdkc";
-
-my $imap = Mail::IMAPClient->new();
-$imap = Mail::IMAPClient->new(
-	Server => $hostname,
-	User => $login,
-	Password => $passwd,
-	UID => 1
-) or die "Cannot connect to localhost as matej: $@";
-
-print "\n===============================\n";
-my @folders = $imap->folders;
-print join("\n",@folders),"\n";
-\ No newline at end of file