#Make the file listbox and scrollbar my $ftp_fileList = $ftp_dialog->add("Listbox")->pack(-side=>'left',-fill=>'both'); my $ftp_fileScrollBar = $ftp_dialog->Scrollbar(-command=>['yview',$ftp_fileList])->pack(-side=>'left',-fill=>'y'); #Bind the scrollcommand to the bar $ftp_fileList->configure(-yscrollcommand=>['set',$ftp_fileScrollBar]); #Make the dir listbox and scrollbar my $ftp_dirList = $ftp_dialog->add("Listbox")->pack(-side=>'right',fill=>'both'); my $ftp_dirScrollBar = $ftp_dialog->Scrollbar(-command=>['yview',$ftp_dirList])->pack(-side=>'right',-fill=>'y'); #Bind the scrollcommand to the bar $ftp_dirList->configure(-yscrollcommand=>['set',$ftp_dirScrollBar]); #Bind the double click method to change directory $ftp_dirList->bind('',[\&cd_List, \$ftp, $ftp_dirList,$ftp_fileList]);