Skip to content
Snippets Groups Projects
Commit c854f35a authored by Gerhard Gonter's avatar Gerhard Gonter :speech_balloon:
Browse files

changes on nbgg3

parent e45465ae
No related branches found
No related tags found
No related merge requests found
......@@ -84,13 +84,13 @@ sub usage
}
my $file_size= $block_size*$mb_count;
print "file_size=[$file_size]\n";
if (!-f $input || (stat(_))[7] < $file_size)
{ # create input file if it does not exist or is too small
my @cmd= ('dd', 'if=/dev/urandom', "of=$input", "bs=$block_size", "count=$mb_count");
print ">>> ", join (' ', @cmd), "\n";
system (@cmd);
}
print "file_size=[$file_size]\n";
unless (-d $output)
{
......@@ -161,7 +161,7 @@ while (1)
else
{
my $rc= system (@c);
print join (' ', @c), ", rc='$rc'\n";
print join (' ', scalar localtime(time()), @c), ", rc='$rc'\n";
if ($rc)
{
print "copy return code=[$rc]; stopping\n";
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment