|
|
|
google unix.com
|
|||||||
| Foros | Registro | Reglas de los Foros | Enlaces | Álbumes | Preguntas más frecuentes | Lista de miembros | Calendario | Búsqueda | Puestos de hoy | Marcar Foros Como Leídos |
| Programación de scripts de shell y Plantear preguntas sobre KSH, CSH, SH, BASH, PERL, PHP, SED, AWK y otros scripts de shell y lenguajes de script de shell aquí. |
Más UNIX y Linux Foro Temas usted puede encontrar útiles
|
||||
| Hilo | Hilo para principiantes | Foro | Respuestas | Último mensaje |
| no puede obtener la concatenación lógica de awk | user_prady | Programación de scripts de shell y | 7 | 12-10-2007 03:09 AM |
| Archivo Concatenación | samit_9999 | UNIX for Dummies Preguntas y Respuestas | 3 | 11-21-2006 06:26 AM |
| la concatenación de cadenas | systemsb | UNIX for Dummies Preguntas y Respuestas | 7 | 04-04-2006 01:03 PM |
| La aplicación de Concatenación (cat) | toughguy2handle | Programación de Alto Nivel | 2 | 09-22-2005 03:10 AM |
| Concatenación | videsh77 | Programación de scripts de shell y | 2 | 12-14-2004 06:13 AM |
 |
Powered by 
|
|
|
Linkback vínculo | Herramientas de hilo | Buscar en este Hilo | Tasa de Hilo | Modos de visualización |
|
|
04-04-2007
|
||||
|
||||
|
Concatenación
¿Cómo puedo hacer esto:
fecha \u003d 4 -----------> 04 Mes \u003d 3 -----------> 03 Quiero hacer una llamada var1 que varibale celebrará el valor de fecha actual y el mes de valor como: 2 dígitos para la fecha. 2 dígitos para el mes. Así que finalmente var1 celebrara valor como 0403 --- MMDD |
|
04-04-2007
|
||||
|
||||
|
Código:
var1=$( printf "%02d%02d" $date $Month ) |
|
04-04-2007
|
||||
|
||||
|
Pero es pedir error de sintaxis ... Código:
$DB_Date=$(printf "%02d%02d", $date, $Month ); |
|
04-04-2007
|
||||
|
||||
|
Cita:
Prueba esta Código:
$DB_Date=sprintf("%02d%02d", $date, $Month);
|
|
04-04-2007
|
||||
|
||||
|
Código:
$DB_Date=sprintf("%02d%02d", $date, $Month);
$DB_Date=printf("%02d%02d", $date, $Month);
He intentado lo anterior .... Pero se da en 0000 ... Realmente estoy perdido la forma en que podría ser posible en PERL. |
|
04-04-2007
|
||||
|
||||
|
¿Puedes mostrar tu código completo?
|
|
04-04-2007
|
||||
|
||||
|
Código:
#!/bin/perl -w
use IO::Handle;
($day, $month, $year) = (localtime)[3,4,5];
$month=$month+1;
$year=$year+1700;
$DB_Date=printf("%02d%02d", $date, $Month);
open (dbfile, "/data1/scp/store/DB/0403/SCP_PP_SUBS.dat") or die "Couldn't get at THE FILE";
@data;
$credit;
$count =0;
print "DB_Date:: $DB_Date \n\n";
print "LESS then the 100 Credit $day/$month/$year\n\n";
print "-------------------------------------------\n";
while (<dbfile>)
{
........................
..........................
............................
...........................
Do some file parsing operation
}
print "Total Count: $count \n";
close dbfile;
|
|
| Marcadores |
| Herramientas de hilo | Buscar en este Hilo |
| Modos de visualización | Vota a este hilo |
|
|
Modo híbrido
