Re^2: Status of long running module call


Your skill will accomplish what the force of many cannot
	PerlMonks

Re^2: Status of long running module call

by dayton (Acolyte)

on Jul 05, 2017 at 15:09 UTC ( [id://1194259]=note: print w/replies, xml )

Need Help??

in reply to Re: Status of long running module call
in thread Status of long running module call

Thanks for the reply... It's a terminal, and I'm fine with actually displaying the results once the bucket is listed... what I'm struggling with is just some kind of status (a spinner or messages like "still working", please wait) while the Amazon::S3 call is being processed.. I have a few spinner routines I've used before, but I just can't get them to work in this case something like

    $bucket = $s3->bucket($b) or die $s3->err . ": " . $s3->errstr;
    print "\nGetting contents of S3 bucket: [$b] \n\tThis might take a
+ while...\n\n";

    while ( ! @{ $response->{keys} } ){
        $response = $bucket->list_all or die $s3->err . ": " . $s3->er
+rstr;
           #please wait status 
    }

   # display bucket contents
[download]