Search Results

Try this.


#!/usr/bin/perl

use List::Util qw(min max sum);

%d = ();

while (<STDIN>)
{
/\(Mid\) ([0-9]+),.*\(Val\) ([0-9.-]+)d/;
next if ($1 eq '' || $2 eq '');
$d{$1} =...

The following code demonstrates a basic menu by using <STDIN> for reading input.


#!/usr/bin/perl

use strict;
use warnings;
use Switch;

my $input = '';

while ($input ne '6')
{
...

Assume the input file is called "table2.sql".


sed -n 's/AUTO_INCREMENT[,]\?$//pI' < table2.sql > output.txt


It saves the output into a temp file called "output.txt". Then read it line by...

The "-f" paramater only accepts a file with no extra arguments.

You may need to rewrite it as:


echo "/full_path_to/foo.sh bar abc " | at now


or create another wrapper script.

The triangle is 3D? Your coordinates have z-axis (x, y, z).

Replace the slashes with spaces.


mydate="22/Oct/2011"
mydate_converted=`echo "$mydate" | sed 's/\// /g'`
mydate=`date -d "$mydate_converted" +%s`

Escape the dollar sign.


\$* ) echo success ;

You already put the content lines of the file into an array, so you can use the array index to display the line number. Using an extra counter is not necessary. Please see the comments in the code...

You can directly use the variables from ftp.properties. Parsing the file is not necessary. The code will look like this:


#!/bin/sh

. ftp.properties

ftp -vin >> ftp.log <<-!
open...

I use for loop in my script. It reads the data from the "users" command. Usernames are separated by a space, so "for" will treat it as a list of items. Then I compare each item in the list with the...

Without "-" or "+" in the "-mtime" option, it means EXTACT value. The "!" means NOT. Thus, the meaning of your original statement is to find any files which the last modified time are NOT EXACTLY two...

Your find command should rewrite to:


find $INDIR -type f -mtime -$DAYS -exec mv {} $OUTDIR \;

It can be shorter.


z += (z < 0 ? 2 : -2 ) * r * cos(theta);

"users" command would be the best choice as it only outputs the usernames without extra useless text.

Username may contain a dot that requires extra handling in regular expression, so I think use...

You tried to copy the data to the address of the pointer (&) which is not correct.

The code should be:


memcpy(finalptr + finaloffset, out, have);

Use "pre" tag in html to show your content. It will process the line breaks. Otherwise, you need to convert the "\n" to "<br>".

The code will look like this:


outputFile="sample.log"
( ...

Thanks Mac!
I seem understanding more of your code now, but not quite sure the exact algorithm. As a learner, I'd like to confirm your logic flow with my comment for the tricky part. If this is too...

You can't pass an array to execute(). A normal way to execute a statement is:


my $sth = $dbh->prepare($sql);
$sth->execute();

Just a reminder:

Your command may fail with "argument list too long" error if there is a lot of files in the directory.

A more fail safe way is:


find "/path" -maxdepth 1 -type f -name...

Simply pipe the output of "ls" to "sed". That is:


ls -l BU/AD_*/ANTS*/SERVER/REJECT | sed '/^.*:$/{N;N;/\ntotal 0\n$/d;}'

sed is easier to perform multi-line matching.


sed '/^.*:$/{N;N;/\ntotal 0\n$/d;}'