Your message dated Sun, 20 Dec 2015 02:50:20 +0100
with message-id <20151220015018.GA26659@portableHP>
and subject line mc: someone perl script not running under mc
has caused the Debian Bug report #780877,
regarding mc: someone perl script is not running under mc
to be marked as done.

This means that you claim that the problem has been dealt with.
If this is not the case it is now your responsibility to reopen the
Bug report if necessary, and/or fix the problem forthwith.

(NB: If you are a system administrator and have no idea what this
message is talking about, this may indicate a serious mail system
misconfiguration somewhere. Please contact [email protected]
immediately.)


-- 
780877: http://bugs.debian.org/cgi-bin/bugreport.cgi?bug=780877
Debian Bug Tracking System
Contact [email protected] with problems
--- Begin Message ---
Package: mc
Version: 3:4.8.3-10
Severity: normal

Dear Maintainer,

I installed Debian 8 jessie in console mode and examine under this system the
book "Perl how to program". Example 3.10, if you enter data attached to it in
book, under mc not running, and the naked command prompt works. Version of mc
is 4.8.13-3.

The data: 56, 52, 64, 72, 56, 58, 62, 63, 48, 52.

Thanks.



-- System Information:
Debian Release: 7.8
  APT prefers stable-updates
  APT policy: (500, 'stable-updates'), (500, 'stable')
Architecture: i386 (i686)

Kernel: Linux 3.2.0-4-686-pae (SMP w/1 CPU core)
Locale: LANG=ru_RU.utf8, LC_CTYPE=ru_RU.utf8 (charmap=UTF-8)
Shell: /bin/sh linked to /bin/dash

Versions of packages mc depends on:
ii  e2fslibs      1.42.5-1.1+deb7u1
ii  libc6         2.13-38+deb7u8
ii  libcomerr2    1.42.5-1.1+deb7u1
ii  libglib2.0-0  2.33.12+really2.32.4-5
ii  libgpm2       1.20.4-6
ii  libslang2     2.2.4-15
ii  mc-data       3:4.8.3-10

Versions of packages mc recommends:
ii  mime-support  3.52-1+deb7u1
ii  perl          5.14.2-21+deb7u2
ii  unzip         6.0-8+deb7u2

Versions of packages mc suggests:
pn  arj                  <none>
ii  bzip2                1.0.6-4
pn  catdvi               <none>
pn  dbview               <none>
pn  djvulibre-bin        <none>
ii  evince [pdf-viewer]  3.4.0-3.1
ii  file                 5.11-2+deb7u7
pn  gv                   <none>
ii  imagemagick          8:6.7.7.10-5+deb7u3
pn  odt2txt              <none>
ii  python               2.7.3-4+deb7u1
pn  python-boto          <none>
pn  python-tz            <none>
ii  w3m                  0.5.3-8
ii  zip                  3.0-6

-- no debconf information
#!/usr/bin/perl
# Fig. 3.10: fig03_10.pl
# Average-sales problem with counter-controlled repetition

# initialization phase
$total = 0;                       # clear total
$weekCounter = 1;                 # prepare to loop

# processing phase
while ( $weekCounter <= 10 ) {    # loop 10 times

   # prompt for input and input a sales value
   print "Enter sales for week $weekCounter: ";
   chomp( $sales = <STDIN> );

   $total += $sales;              # add sales to total
   ++$weekCounter;                # increment counter
}

$average = $total / 10;           # divide to find average
print "\nSales averaged $average computers per week\n";

--- End Message ---
--- Begin Message ---

Attachment: signature.asc
Description: PGP signature


--- End Message ---

Reply via email to